login
A369864
a(n) = Sum_{p|n, p prime} n^(mu(n/p)^2).
1
0, 2, 3, 4, 5, 12, 7, 1, 9, 20, 11, 13, 13, 28, 30, 1, 17, 19, 19, 21, 42, 44, 23, 2, 25, 52, 1, 29, 29, 90, 31, 1, 66, 68, 70, 2, 37, 76, 78, 2, 41, 126, 43, 45, 46, 92, 47, 2, 49, 51, 102, 53, 53, 2, 110, 2, 114, 116, 59, 62, 61, 124, 64, 1, 130, 198, 67, 69, 138
OFFSET
1,2
FORMULA
a(p^k) = p^k, for p prime and 1 <= k <= 2, else 1 if k >= 3. - Wesley Ivan Hurt, Jun 26 2024
MATHEMATICA
Table[DivisorSum[n, n^(MoebiusMu[n/#]^2) &, PrimeQ[#] &], {n, 100}]
CROSSREFS
Cf. A008683 (mu), A137851, A143519.
Sequence in context: A014545 A158930 A330263 * A065636 A353694 A328260
KEYWORD
nonn,easy
AUTHOR
Wesley Ivan Hurt, Feb 03 2024
STATUS
approved