A258647 Seventh arithmetic derivative of n.

0, 0, 0, 0, 4, 0, 0, 0, 752, 0, 0, 0, 1520, 0, 0, 368, 3424, 0, 0, 0, 1552, 0, 0, 0, 3120, 0, 176, 27, 3424, 0, 0, 0, 8592, 0, 0, 752, 3312, 0, 0, 1520, 912, 0, 0, 0, 8144, 752, 0, 0, 16304, 0, 368, 608, 3312, 0, 5076, 1520, 8976, 0, 0, 0, 8976, 0, 0, 240

Offset

0,5

Links

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

Formula

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

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, 7):
seq(a(n), n=0..70);

Crossrefs

Column k=7 of A258651.

Cf. A003415.

Sequence in context: A222953 A101193 A258646 * A013334 A258648 A185232

Adjacent sequences: A258644 A258645 A258646 * A258648 A258649 A258650

Keyword

nonn

Author

Alois P. Heinz, Jun 06 2015

Status

approved