A318502 a(n) = SumXOR_{d|n} [moebius(n/d) < 0]*(sigma(d)-d).

0, 0, 0, 1, 0, 0, 0, 3, 1, 0, 0, 5, 0, 0, 0, 7, 0, 2, 0, 11, 0, 0, 0, 23, 1, 0, 4, 9, 0, 7, 0, 15, 0, 0, 0, 5, 0, 0, 0, 17, 0, 7, 0, 13, 13, 0, 0, 43, 1, 14, 0, 19, 0, 24, 0, 27, 0, 0, 0, 45, 0, 0, 15, 31, 0, 7, 0, 23, 0, 15, 0, 19, 0, 0, 15, 21, 0, 7, 0, 61, 13, 0, 0, 59, 0, 0, 0, 47, 0, 31, 0, 25, 0, 0, 0, 83, 0, 2, 11, 61, 0, 7, 0, 41, 15

Offset: 1

Author

Antti Karttunen, Aug 28 2018

Keywords

• nonn

Links

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

Crossrefs

Cf. A003987, A008683, A318326, A318501, A318503.

Programs

PARI

A318502(n) = { my(v=0); fordiv(n, d, if(-1==moebius(n/d), v=bitxor(v, sigma(d)-d))); (v); };

Formula

a(n) = A318501(n) XOR A318503(n).