A326059 a(n) = A285309(n) - n, where A285309 gives the sum of nonsquare divisors of n.

-1, 0, 0, -2, 0, 5, 0, 2, -6, 7, 0, 11, 0, 9, 8, -6, 0, 11, 0, 17, 10, 13, 0, 31, -20, 15, 3, 23, 0, 41, 0, 10, 14, 19, 12, 5, 0, 21, 16, 45, 0, 53, 0, 35, 23, 25, 0, 55, -42, 17, 20, 41, 0, 56, 16, 59, 22, 31, 0, 103, 0, 33, 31, -22, 18, 77, 0, 53, 26, 73, 0, 73, 0, 39, 23, 59, 18, 89, 0, 85, -51, 43, 0, 135, 22, 45, 32, 87, 0, 134, 20

Offset

1,4

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) = A285309(n) - n.

a(n) = A326058(n) - A033879(n).

Prog

(PARI)
A285309(n) = sumdiv(n, d, (!issquare(d))*d);
A326059(n) = (A285309(n)-n);

Crossrefs

Cf. A033879, A285309, A326058, A326060.

Sequence in context: A061376 A058974 A369744 * A019962 A086131 A355875

Adjacent sequences: A326056 A326057 A326058 * A326060 A326061 A326062

Keyword

sign

Author

Antti Karttunen, Jun 06 2019

Status

approved