A258858 Eighth pi-based arithmetic derivative of n.
0, 0, 0, 0, 4, 0, 4, 4, 12288, 12288, 0, 0, 81920, 4, 208, 512, 622592, 4, 512, 2304, 622592, 208, 80, 2304, 52056, 2304, 512, 1050624, 114752, 0, 12288, 0, 4931584, 2304, 0, 4, 11900, 12288, 4, 114752, 11900, 4, 32, 80, 423168, 9936, 4, 208, 3679488, 3084
Offset: 0
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..10000
Programs
-
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, 8): seq(a(n), n=0..100);
Formula
a(n) = A258851^8(n).