A153062 a(0)=1, a(n)=a(n-1)^2-n^2.
1, 0, -4, 7, 33, 1064, 1132060, 1281559843551, 1642395632602463596289537, 2697463413991646582332856337058890220473935674288, 7276308869823469318922107258255539214217660183827400648026742290333726278585952350082821224306844
Offset: 0
Keywords
Links
Programs
-
Mathematica
a=1;lst={};Do[a=a^2-n^2;AppendTo[lst,a],{n,0,12}];lst RecurrenceTable[{a[0]==1, a[n]==a[n-1]^2-n^2}, a, {n, 0, 10}] (* Vaclav Kotesovec, Dec 18 2014 *)
Formula
a(n) ~ c^(2^n), where c = 1.24334516566159378905145559484975509773481252881469517052010008004602693351819... . - Vaclav Kotesovec, Dec 18 2014