|
%I #16 Sep 29 2023 18:57:49
%S 8,36,666,222111,24666759216,304224505122393846936,
%T 46276274758482720006792605816457695217516,
%U 1070746802761292462947634762387664148872006333922794021004562705432032738124213886
%N Iterated triangular numbers with seed 8.
%H Reinhard Zumkeller, <a href="/A050536/b050536.txt">Table of n, a(n) for n = 0..10</a>
%F a(n) = binomial(a(n-1)+1, 2), a(0)=8.
%F a(n) ~ 2 * c^(2^n), where c = 4.2726038862497240421168669075178596377687659229240586312... . - _Vaclav Kotesovec_, Dec 17 2014
%t NestList[Binomial[#+1,2]&,8,7] (* _Harvey P. Dale_, Jan 22 2016 *)
%o (Haskell)
%o a050536 n = a050536_list !! n
%o a050536_list = iterate a000217 8 -- _Reinhard Zumkeller_, Apr 10 2014
%o (PARI) a(n)=if(n==0,8,(a(n-1))*(a(n-1)+1)/2) \\ _Edward Jiang_, Sep 07 2014
%Y Cf. A000217.
%Y Cf. A007501, A013589, A050542, A050548, A050909.
%K easy,nice,nonn
%O 0,1
%A Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Dec 29 1999
%E One more term (a(7)) from _Harvey P. Dale_, Jan 22 2016
| 