%I #12 Dec 15 2017 17:35:49
%S 2,3,10,17,626,37,117650,4097,531442,10001,25937424602,20737,
%T 23298085122482,7529537,2562890626,4294967297,48661191875666868482,
%U 34012225,104127350297911241532842,25600000001,7355827511386642
%N a(n) = n^phi(n) + 1.
%H Harry J. Smith, <a href="/A066915/b066915.txt">Table of n, a(n) for n = 1..100</a>
%t Table[n^EulerPhi[n]+1,{n,30}] (* _Harvey P. Dale_, May 29 2014 *)
%o (PARI) { for (n=1, 100, write("b066915.txt", n, " ", n^eulerphi(n) + 1) ) } \\ _Harry J. Smith_, Apr 06 2010
%Y Cf. A066719.
%K nonn
%O 1,1
%A _Jason Earls_, Jan 23 2002
|