login
A336922
a(n) = A331410(n) - A005087(n).
7
0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 2, 1, 2, 1, 0, 1, 1, 0, 3, 1, 2, 0, 3, 1, 0, 0, 1, 2, 1, 1, 3, 2, 1, 1, 2, 0, 2, 1, 2, 1, 1, 0, 1, 3, 2, 1, 3, 2, 2, 0, 2, 3, 3, 1, 1, 0, 1, 0, 2, 1, 3, 2, 1, 1, 2, 1, 4, 3, 3, 2, 1, 1, 2, 1, 3, 2, 2, 0, 3, 2, 3, 1, 4, 2, 1, 1, 0, 1, 3, 0, 2, 1, 2, 3, 4, 2, 2, 1, 1
OFFSET
1,17
LINKS
FORMULA
a(n) = A331410(n) - A005087(n).
a(n) = A336921(n) + A046660(A000265(n)).
PROG
(PARI)
A005087(n) = omega(n>>valuation(n, 2));
A331410(n) = if(!bitand(n, n-1), 0, 1+A331410(n+(n/vecmax(factor(n)[, 1]))));
A336922(n) = (A331410(n) - A005087(n));
CROSSREFS
Cf. A000265, A005087, A054784 (positions of zeros), A331410, A336467, A336921, A336923.
Cf. also A336469.
Sequence in context: A060588 A221167 A286134 * A276469 A272356 A102565
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 09 2020
STATUS
approved