login
A333784
a(n) = sigma(n) - A332994(n).
7
0, 0, 0, 0, 0, 3, 0, 0, 0, 5, 0, 9, 0, 7, 5, 0, 0, 12, 0, 15, 7, 11, 0, 21, 0, 13, 0, 21, 0, 33, 0, 0, 11, 17, 7, 36, 0, 19, 13, 35, 0, 45, 0, 33, 20, 23, 0, 45, 0, 30, 17, 39, 0, 39, 11, 49, 19, 29, 0, 89, 0, 31, 28, 0, 13, 69, 0, 51, 23, 61, 0, 84, 0, 37, 30, 57, 11, 81, 0, 75, 0, 41, 0, 121, 17, 43, 29, 77, 0, 117, 13, 69, 31
OFFSET
1,6
FORMULA
a(n) = A000203(n) - A332994(n).
a(n) = A001065(n) - A322382(n).
a(n) = A333783(n) + A333791(n).
PROG
(PARI)
A332994(n) = if(1==n, n, n + A332994(n/vecmax(factor(n)[, 1])));
A333784(n) = (sigma(n) - A332994(n));
CROSSREFS
Cf. A000203, A000961 (positions of zeros), A001065, A052126, A322382, A332994, A333783, A333791.
Sequence in context: A184762 A330734 A081805 * A181189 A327889 A221702
KEYWORD
nonn
AUTHOR
Antti Karttunen, Apr 05 2020
STATUS
approved