%I #16 Nov 27 2018 15:56:37
%S 2,9,1000,17850625,96132816409376,221244556300694143783489,
%T 311992044873796240380263281250000000,
%U 374145846406785831860102174312003089603054492712961,507528892168086660506357001295247426244187377081938096246553087918592
%N a(n) = (n^(n-1)+1)^n.
%F a(n) = (n^(n-1)+1)^n = (n^n+n)^n/n^n.
%e For n=2 a(2)=(2^(2-1)+1)^2=(2+1)^2=9.
%t a253604[n_] := Block[{f}, f[x_] := (x^(x - 1) + 1)^x; Array[f, n]]; a253604[9] (* _Michael De Vlieger_, Jan 06 2015 *)
%t Table[(n^(n-1)+1)^n,{n,9}] (* _Harvey P. Dale_, Nov 27 2018 *)
%K nonn
%O 1,1
%A _Abhik Sarkar_, Jan 05 2015
%E Corrected by _Harvey P. Dale_, Nov 27 2018
|