A080304 Numerator of n^mu(n), where mu is the Moebius function (A008683).

1, 1, 1, 1, 1, 6, 1, 1, 1, 10, 1, 1, 1, 14, 15, 1, 1, 1, 1, 1, 21, 22, 1, 1, 1, 26, 1, 1, 1, 1, 1, 1, 33, 34, 35, 1, 1, 38, 39, 1, 1, 1, 1, 1, 1, 46, 1, 1, 1, 1, 51, 1, 1, 1, 55, 1, 57, 58, 1, 1, 1, 62, 1, 1, 65, 1, 1, 1, 69, 1, 1, 1, 1, 74, 1, 1, 77, 1, 1, 1, 1, 82, 1, 1, 85, 86, 87, 1, 1, 1, 91, 1

Offset: 1

Author

Reinhard Zumkeller, Feb 13 2003

Keywords

• nonn
• frac

Links

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

Crossrefs

Denominator: A080305. Cf. A080306, A080326, A166142.

Programs

PARI

A080304(n) = numerator(n^moebius(n)); \\ Antti Karttunen, Aug 06 2018

Formula

a(n) = if mu(n)>0 then n else 1.