|
%I #21 Jan 16 2018 02:49:56
%S 1,27,46656,10000000000,437893890380859375,
%T 5842587018385982521381124421,
%U 33145523113253374862572728253364605812736,106387358923716524807713475752456393740167855629859291136
%N Triangular number t(n) raised to power t(n).
%H Vincenzo Librandi, <a href="/A008974/b008974.txt">Table of n, a(n) for n = 1..25</a>
%p [ seq( ( n*(n+1)/2 )^( n*(n+1)/2 ), n=1..10) ];
%t s=0;lst={};Do[s+=n;AppendTo[lst,s^s],{n,12}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jun 11 2009 *)
%t #^#&/@Accumulate[Range[10]] (* _Harvey P. Dale_, Sep 10 2014 *)
%o (PARI) a(n) = my(t=n*(n+1)/2); t^t; \\ _Michel Marcus_, Jan 16 2018
%Y Cf. A000217.
%K nonn
%O 1,2
%A _N. J. A. Sloane_
%E One more term added by _Vladimir Joseph Stephan Orlovsky_, Jun 11 2009
| 