login
A343224
a(n) = sigma(n) - A003415(n), where A003415 is the arithmetic derivative, and sigma is the sum of divisors of n.
2
1, 2, 3, 3, 5, 7, 7, 3, 7, 11, 11, 12, 13, 15, 16, -1, 17, 18, 19, 18, 22, 23, 23, 16, 21, 27, 13, 24, 29, 41, 31, -17, 34, 35, 36, 31, 37, 39, 40, 22, 41, 55, 43, 36, 39, 47, 47, 12, 43, 48, 52, 42, 53, 39, 56, 28, 58, 59, 59, 76, 61, 63, 53, -65, 66, 83, 67, 54, 70, 85, 71, 39, 73, 75, 69, 60, 78, 97, 79, 10, 13
OFFSET
1,2
FORMULA
a(n) = A000203(n) - A003415(n).
PROG
(PARI)
A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
A343224(n) = sigma(n) - A003415(n).
CROSSREFS
Sequence in context: A211890 A231406 A214034 * A047844 A081217 A335139
KEYWORD
sign
AUTHOR
Antti Karttunen, Apr 15 2021
STATUS
approved