A258646 Sixth arithmetic derivative of n.

0, 0, 0, 0, 4, 0, 0, 0, 368, 0, 0, 0, 752, 0, 0, 176, 1520, 0, 0, 0, 608, 0, 0, 0, 1552, 0, 80, 27, 1520, 0, 0, 0, 3424, 0, 0, 368, 1312, 0, 0, 752, 288, 0, 0, 0, 3120, 368, 0, 0, 8144, 0, 176, 240, 1312, 0, 2484, 752, 3312, 0, 0, 0, 3312, 0, 1, 112, 245760, 0

Offset: 0

Author

Alois P. Heinz, Jun 06 2015

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..10000

Crossrefs

Column k=6 of A258651.

Cf. A003415.

Programs

Maple

d:= n-> n*add(i[2]/i[1], i=ifactors(n)[2]):
A:= proc(n, k) option remember; `if`(k=0, n, d(A(n, k-1))) end:
a:= n-> A(n, 6):
seq(a(n), n=0..70);

Formula

a(n) = A003415^6(n).