|
%I #8 Sep 08 2022 08:45:51
%S 1,4,9,256,25,46656,2401,262144,6561,10000000000,14641,8916100448256,
%T 4826809,1475789056,2562890625,18446744073709551616,24137569,
%U 39346408075296537575424,16983563041
%N a(n) = n ^ phi(n+1), phi(n) = A000010(n) = Euler totient function.
%H Vincenzo Librandi, <a href="/A175700/b175700.txt">Table of n, a(n) for n = 1..300</a>
%e For n = 6, a(6) = 6 ^ phi(6+1) = 6 ^ A000010(7) = 6 ^ 6 = 46656.
%t Table[n^EulerPhi[n+1],{n,1,30}] (* _Vincenzo Librandi_, Jul 13 2012
%o (Magma) [ n^EulerPhi(n+1): n in [1..20]]; // _Vincenzo Librandi_, Jul 13 2012
%o (PARI) a(n)=n^eulerphi(n+1) \\ _Charles R Greathouse IV_, Mar 05 2013
%K nonn
%O 1,2
%A _Jaroslav Krizek_, Aug 09 2010
|
