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

%I #8 Aug 06 2018 22:26:46

%S 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,

%T 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,

%U 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

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

%H Antti Karttunen, <a href="/A080304/b080304.txt">Table of n, a(n) for n = 1..65537</a>

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

%o (PARI) A080304(n) = numerator(n^moebius(n)); \\ _Antti Karttunen_, Aug 06 2018

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

%K nonn,frac

%O 1,6

%A _Reinhard Zumkeller_, Feb 13 2003