A318441 a(n) = Sum_{d|n} [moebius(n/d) > 0]*A033879(d).

1, 1, 2, 1, 4, 1, 6, 1, 5, 3, 10, -3, 12, 5, 7, 1, 16, -1, 18, -1, 11, 9, 22, -11, 19, 11, 14, 1, 28, -5, 30, 1, 19, 15, 23, -19, 36, 17, 23, -9, 40, -3, 42, 5, 14, 21, 46, -27, 41, 11, 31, 7, 52, -7, 39, -7, 35, 27, 58, -45, 60, 29, 24, 1, 47, 1, 66, 11, 43, 7, 70, -55, 72, 35, 30, 13, 59, 3, 78, -25, 41, 39, 82, -51, 63, 41, 55, -3, 88

Offset

1,3

Links

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

Formula

a(n) = Sum_{d|n} [A008683(n/d) == 1]*A033879(d).

a(n) = A291784(n) - A318325(n).

A083254(n) = a(n) - A318442(n).

Prog

(PARI) A318441(n) = sumdiv(n, d, (1==moebius(n/d))*(d+d-sigma(d)));

Crossrefs

Cf. A033879, A083254, A291784, A318325, A318442.

Sequence in context: A329641 A329638 A322036 * A161510 A329379 A328479

Adjacent sequences: A318438 A318439 A318440 * A318442 A318443 A318444

Keyword

sign

Author

Antti Karttunen, Aug 26 2018

Status

approved