A062076 - OEIS

%I #14 Jul 01 2018 16:34:00

%S 1,72,30375,39337984,115330078125,642717115324416,6079641716636816419,

%T 90173697372979200000000,1977711563718087630651728793,

%U 61310662578010000000000000000000,2592141053862458599877539880738729631,145178629166001276793653488201070268121088

%N a(n) = (2n-1)^n * n^(2n-1).

%H Harry J. Smith, <a href="/A062076/b062076.txt">Table of n, a(n) for n = 1..100</a>

%t f[n_]:=Module[{c=2n-1},c^n n^c];Array[f,20] (* _Harvey P. Dale_, Sep 08 2011 *)

%o (PARI) for(n=1,15,print((2*n-1)^n * n^(2*n-1)))

%o (PARI) { for (n=1, 100, b=2*n - 1; write("b062076.txt", n, " ", b^n * n^b) ) } \\ _Harry J. Smith_, Jul 31 2009

%K nonn

%O 1,2

%A _Jason Earls_, Jun 27 2001

%E More terms from _Harvey P. Dale_, Sep 08 2011