login
A329032
a(n) = A327860(A328842(n)).
4
0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 8, 8, 10, 10, 10, 10, 55, 55, 75, 75, 75, 75, 350, 350, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 8, 8, 10, 10, 10, 10, 55, 55, 75, 75, 75, 75, 350, 350, 1, 1, 1, 1, 10, 10, 1, 1, 1, 1, 10, 10, 12, 12, 12, 12, 71, 71, 95, 95, 95, 95, 460, 460, 650, 650, 650, 650, 2825, 2825, 14, 14, 14, 14
OFFSET
0,17
FORMULA
PROG
(PARI) A329032(n) = { my(s=0, m=1, p=2, e); while(n, e = (n%p); if(e, m *= (p^(e-1)); s += ((e-1)/p)); n = n\p; p = nextprime(1+p)); (s*m); };
CROSSREFS
Cf. A276156 (positions of zeros).
Sequence in context: A298186 A175218 A298916 * A001732 A213746 A219236
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 07 2019
STATUS
approved