login
A324044
a(n) = A003958(n) - A033879(n).
2
0, 0, 0, 0, 0, 2, 0, 0, -1, 2, 0, 6, 0, 2, 2, 0, 0, 7, 0, 6, 2, 2, 0, 14, -3, 2, -6, 6, 0, 20, 0, 0, 2, 2, 2, 23, 0, 2, 2, 14, 0, 24, 0, 6, 4, 2, 0, 30, -5, 9, 2, 6, 0, 20, 2, 14, 2, 2, 0, 56, 0, 2, 2, 0, 2, 32, 0, 6, 2, 28, 0, 55, 0, 2, 6, 6, 2, 36, 0, 30, -25, 2, 0, 68, 2, 2, 2, 14, 0, 70, 2, 6, 2, 2, 2, 62, 0, 11, -2, 33, 0, 44, 0, 14, 30
OFFSET
1,6
LINKS
FORMULA
a(n) = A003958(n) - A033879(n).
PROG
(PARI)
A003958(n) = { my(f = factor(n)); for(i=1, #f~, f[i, 1]--); factorback(f); };
A033879(n) = (2*n-sigma(n));
A324044(n) = (A003958(n)-A033879(n));
CROSSREFS
Cf. also A319687, A323911.
Sequence in context: A277808 A105964 A303051 * A364046 A001899 A059882
KEYWORD
sign
AUTHOR
Antti Karttunen, Feb 13 2019
STATUS
approved