OFFSET
1,2
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..65537
FORMULA
a(n) = if mu(n)<0 then n else 1, where mu is Moebius mu function (A008683).
MATHEMATICA
Table[n^MoebiusMu[n], {n, 100}]//Denominator (* Harvey P. Dale, Jun 18 2023 *)
PROG
(PARI) A080305(n) = denominator(n^moebius(n)); \\ Antti Karttunen, Aug 06 2018
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Reinhard Zumkeller, Feb 13 2003
STATUS
approved