A326058 a(n) = n - {the sum of square divisors of n}.

0, 1, 2, -1, 4, 5, 6, 3, -1, 9, 10, 7, 12, 13, 14, -5, 16, 8, 18, 15, 20, 21, 22, 19, -1, 25, 17, 23, 28, 29, 30, 11, 32, 33, 34, -14, 36, 37, 38, 35, 40, 41, 42, 39, 35, 45, 46, 27, -1, 24, 50, 47, 52, 44, 54, 51, 56, 57, 58, 55, 60, 61, 53, -21, 64, 65, 66, 63, 68, 69, 70, 22, 72, 73, 49, 71, 76, 77, 78, 59, -10, 81, 82, 79

Offset

1,3

Links

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

Formula

a(n) = n - A035316(n).

a(n) = A033879(n) + A326059(n).

Prog

(PARI)
A035316(n) = sumdiv(n, d, issquare(d)*d);
A326058(n) = (n-A035316(n));

Crossrefs

Cf. A033879, A035316, A326059, A326060.

Sequence in context: A373948 A074720 A323456 * A262586 A058359 A261608

Adjacent sequences: A326055 A326056 A326057 * A326059 A326060 A326061

Keyword

sign

Author

Antti Karttunen, Jun 06 2019

Status

approved