A318447 a(n) = Sum_{d|n, d<n} A294898(d), where A294898(d) = A005187(d) - sigma(d).

0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, -2, 0, 3, 2, 0, 0, 1, 0, 2, 3, 7, 0, -8, 2, 9, 3, 4, 0, 2, 0, 0, 7, 14, 5, -10, 0, 15, 9, -2, 0, 9, 0, 12, 7, 18, 0, -22, 3, 18, 14, 16, 0, 6, 9, 1, 15, 24, 0, -24, 0, 25, 13, 0, 11, 26, 0, 26, 18, 25, 0, -45, 0, 33, 20, 28, 10, 32, 0, -14, 13, 37, 0, -15, 16, 38, 24, 13, 0, -8, 12, 34, 25, 41, 17, -52, 0

Offset

1,10

Links

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

Formula

a(n) = Sum_{d|n, d<n} A294898(d).

a(n) = A318448(n) - A294898(n).

a(n) = A318445(n) - A211779(n).

a(n) = A296074(n) - A292257(n).

Prog

(PARI)
A005187(n) = { my(s=n); while(n>>=1, s+=n); s; };
A294898(n) = (A005187(n) - sigma(n));
A318447(n) = sumdiv(n, d, (d<n)*A294898(d));

Crossrefs

Cf. A000203, A005187, A211779, A292257, A294898, A296074, A318445, A318448.

Sequence in context: A029224 A029188 A317844 * A273846 A090290 A153585

Adjacent sequences: A318444 A318445 A318446 * A318448 A318449 A318450

Keyword

sign

Author

Antti Karttunen, Aug 27 2018

Status

approved