A258860 Tenth pi-based arithmetic derivative of n.

0, 0, 0, 0, 4, 0, 4, 4, 622592, 622592, 0, 0, 4931584, 4, 2304, 12288, 38944768, 4, 12288, 81920, 38944768, 2304, 512, 81920, 714096, 81920, 12288, 65719296, 2298880, 0, 622592, 0, 278380544, 81920, 0, 4, 85988, 622592, 4, 2298880, 85988, 4, 208, 512, 13319168

Offset

0,5

Links

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

Formula

a(n) = A258851^10(n).

Maple

with(numtheory):
d:= n-> n*add(i[2]*pi(i[1])/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, 10):
seq(a(n), n=0..100);

Crossrefs

Column k=10 of A258850.

Cf. A000720, A258851.

Sequence in context: A258858 A258849 A258859 * A134944 A088375 A217220

Adjacent sequences: A258857 A258858 A258859 * A258861 A258862 A258863

Keyword

nonn

Author

Alois P. Heinz, Jun 12 2015

Status

approved