|
%I #15 Apr 11 2020 19:51:11
%S 2,72,30375,39337984,7863818359375,63041475422674944,
%T 95457296408818459356311,2447589381851869692142026752,
%U 15963504582593979093637042624484127
%N a(n) = prime(n)^n * n^prime(n).
%H Harry J. Smith, <a href="/A062082/b062082.txt">Table of n, a(n) for n = 1..80</a>
%t Table[Prime[n]^n n^Prime[n],{n,10}] (* _Harvey P. Dale_, Apr 11 2020 *)
%o (PARI) for(n=1,12,print(prime(n)^n * n^prime(n)))
%o (PARI) { for (n=1, 80, b=prime(n); write("b062082.txt", n, " ", b^n * n^b) ) } \\ _Harry J. Smith_, Aug 01 2009
%Y Cf. A000040.
%K nonn
%O 1,1
%A _Jason Earls_, Jun 27 2001
|
