A326185 a(n) = sigma(n) - A057521(n) - n.

-1, 0, 0, -1, 0, 5, 0, -1, -5, 7, 0, 12, 0, 9, 8, -1, 0, 12, 0, 18, 10, 13, 0, 28, -19, 15, -14, 24, 0, 41, 0, -1, 14, 19, 12, 19, 0, 21, 16, 42, 0, 53, 0, 36, 24, 25, 0, 60, -41, 18, 20, 42, 0, 39, 16, 56, 22, 31, 0, 104, 0, 33, 32, -1, 18, 77, 0, 54, 26, 73, 0, 51, 0, 39, 24, 60, 18, 89, 0, 90, -41, 43, 0, 136, 22, 45, 32, 84, 0

Offset

1,6

Links

Antti Karttunen, Table of n, a(n) for n = 1..16384

Antti Karttunen, Data supplement: n, a(n) computed for n = 1..65537

Formula

a(n) = A326184(n) - n = sigma(n) - A057521(n) - n.

a(n) = A001065(n) - A057521(n).

Prog

(PARI)
A057521(n) = { my(f=factor(n)); prod(i=1, #f~, if(f[i, 2]>1, f[i, 1]^f[i, 2], 1)); }; \\ From A057521.
A326185(n) = ((sigma(n)-A057521(n))-n);

Crossrefs

Cf. A000203, A001065, A057521, A326184, A326186.

Cf. also A326188.

Sequence in context: A021670 A060081 A197515 * A293508 A083861 A097591

Adjacent sequences: A326182 A326183 A326184 * A326186 A326187 A326188

Keyword

sign

Author

Antti Karttunen, Jul 11 2019

Status

approved