A329032 a(n) = A327860(A328842(n)).

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

Links

Antti Karttunen, Table of n, a(n) for n = 0..2589

Antti Karttunen, Data supplement: n, a(n) computed for n = 0..32768

Index entries for sequences related to primorial base

Formula

a(n) = A327860(A328842(n)) = A003415(A276086(A328842(n))) = A003415(A328572(n)).

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. A003415, A276086, A327860, A328572, A328842, A329031.

Cf. A276156 (positions of zeros).

Sequence in context: A298186 A175218 A298916 * A001732 A213746 A219236

Adjacent sequences: A329029 A329030 A329031 * A329033 A329034 A329035

Keyword

nonn

Author

Antti Karttunen, Nov 07 2019

Status

approved