A051443 a(n) = n^(n+1)*(n+1)^n.
0, 2, 72, 5184, 640000, 121500000, 32934190464, 12089663946752, 5777633090469888, 3486784401000000000, 2593742460100000000000, 2331878554708454877954048, 2492736806448711465154117632, 3125153805191532199063557103616, 4541487905530112153400000000000000
Offset: 0
Programs
-
Mathematica
Table[n^(n+1)*(n+1)^n,{n,0,20}] (* Vladimir Joseph Stephan Orlovsky, Apr 26 2010 *)
-
Maxima
A051443[n]:=n^(n+1)*(n+1)^n$ makelist(A051443[n],n,0,30); /* Martin Ettl, Oct 29 2012 */