login
A323879
Number of divisors d of n such that A276154(d) divides n.
5
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
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. also A323878.
Sequence in context: A192174 A262202 A284413 * A129308 A159200 A338021
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Feb 07 2019
STATUS
approved