A175699 a(n) = n ^ phi(n-1), phi(n) = A000010(n) = Euler totient function.
1, 2, 3, 16, 25, 1296, 49, 262144, 6561, 1000000, 14641, 61917364224, 28561, 56693912375296, 11390625, 4294967296, 6975757441, 121439531096594251776, 47045881
Offset: 1
Keywords
Examples
For n = 6, a(6) = 6 ^ phi(6-1) = 6 ^ A000010(5) = 6 ^ 4 = 1296.
Programs
-
Mathematica
Table[n^EulerPhi[n-1],{n,20}] (* Harvey P. Dale, Jul 11 2020 *)
-
PARI
a(n)=n^eulerphi(n-1) \\ Charles R Greathouse IV, Feb 21 2013