A345060 a(n) = A071324(n) - A206369(n).

0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 0, 2, 0, 2, 4, 0, 0, 6, 0, 0, 4, 2, 0, 6, 0, 2, 0, 0, 0, 14, 0, 0, 4, 2, 8, 4, 0, 2, 4, 4, 0, 20, 0, 0, 8, 2, 0, 10, 0, 10, 4, 0, 0, 20, 8, 8, 4, 2, 0, 16, 0, 2, 4, 0, 8, 28, 0, 0, 4, 18, 0, 14, 0, 2, 20, 0, 12, 32, 0, 4, 0, 2, 0, 18, 8, 2, 4, 10, 0, 40, 12, 0, 4, 2, 8, 22, 0, 14, 0, 0, 0, 40

Offset

1,6

Links

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

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

Formula

a(n) = A071324(n) - A206369(n).

Prog

(PARI)
A071324(n) = my(d=Vecrev(divisors(n))); sum(k=1, #d, (-1)^(k+1)*d[k]); \\ From A071324
A206369(n) = sumdiv(n, d, eulerphi(n/d) * issquare(d)); \\ From A206369
A345060(n) = (A071324(n)-A206369(n));

Crossrefs

Cf. A071324, A206369, A345061, A345062, A345063.

Cf. A317923 (positions of zeros), A345064 (and their characteristic function).

Sequence in context: A172246 A087893 A079169 * A097106 A175801 A361250

Adjacent sequences: A345057 A345058 A345059 * A345061 A345062 A345063

Keyword

nonn

Author

Antti Karttunen, Jun 07 2021

Status

approved