A323879 Number of divisors d of n such that A276154(d) divides n.

0, 1, 0, 1, 0, 2, 0, 1, 0, 1, 0, 3, 0, 1, 0, 1, 0, 2, 0, 1, 0, 1, 0, 4, 0, 1, 0, 1, 0, 3, 0, 1, 0, 1, 0, 3, 0, 1, 0, 1, 0, 2, 0, 2, 0, 1, 0, 4, 0, 1, 0, 1, 0, 2, 0, 1, 0, 1, 0, 5, 0, 1, 0, 1, 0, 2, 0, 1, 0, 2, 0, 5, 0, 1, 0, 1, 0, 2, 0, 1, 0, 1, 0, 3, 0, 1, 0, 2, 0, 4, 0, 1, 0, 1, 0, 4, 0, 1, 0, 1, 0, 2, 0, 1, 0

Offset

1,6

Links

Antti Karttunen, Table of n, a(n) for n = 1..30030

Index entries for sequences related to primorial base

Formula

a(n) = Sum_{d|n} [A276154(d)|n], where [ ] is the Iverson bracket.

Prog

(PARI)
A276151(n) = { my(s=1); forprime(p=2, , if(n%p, return(n-s), s *= p)); };
A276152(n) = { my(s=1); forprime(p=2, , if(n%p, return(s*p), s *= p)); };
A276154(n) = if(!n, n, (A276152(n) + A276154(A276151(n))));
A323879(n) = sumdiv(n, d, !(n%A276154(d)));

Crossrefs

Cf. A002110, A276154.

Cf. also A323878.

Sequence in context: A192174 A262202 A284413 * A129308 A159200 A338021

Adjacent sequences: A323876 A323877 A323878 * A323880 A323881 A323882

Keyword

nonn,base

Author

Antti Karttunen, Feb 07 2019

Status

approved