A344575 a(n) = Sum_{d|n} d^abs(mu(n/d)).

1, 3, 4, 7, 6, 12, 8, 14, 13, 18, 12, 26, 14, 24, 24, 27, 18, 38, 20, 38, 32, 36, 24, 52, 31, 42, 38, 50, 30, 72, 32, 52, 48, 54, 48, 77, 38, 60, 56, 76, 42, 96, 44, 74, 74, 72, 48, 102, 57, 92, 72, 86, 54, 112, 72, 100, 80, 90, 60, 148, 62, 96, 98, 101, 84, 144, 68, 110, 96

Offset

1,2

Comments

If p is prime, a(p) = Sum_{d|p} d^abs(mu(p/d)) = 1^1 + p^1 = p + 1.

Links

Table of n, a(n) for n=1..69.

Formula

a(8) = Sum_{d|8} d^abs(mu(8/d)) = 1^0 + 2^0 + 4^1 + 8^1 = 14.

Mathematica

Table[Sum[k^Abs[MoebiusMu[n/k]] (1 - Ceiling[n/k] + Floor[n/k]), {k, n}], {n, 100}]

Crossrefs

Cf. A008683 (mu).

Sequence in context: A333926 A051378 A366440 * A254981 A116607 A355633

Adjacent sequences: A344572 A344573 A344574 * A344576 A344577 A344578

Keyword

nonn

Author

Wesley Ivan Hurt, May 23 2021

Status

approved