OFFSET
0,3
LINKS
FORMULA
a(n) = a(n-1)^2 - 2a(n-1)a(n-2)+a(n-2)^2 + a(n-1) + 1 for n > 1. [Charles R Greathouse IV, Dec 29 2011]
a(n) ~ c^(2^n), where c = A076949 = 1.225902443528748538627947495913... . - Vaclav Kotesovec, Dec 18 2014
MATHEMATICA
Accumulate[NestList[#^2 + 1 &, 0, 11]] (* Vladimir Joseph Stephan Orlovsky, Feb 24 2012 *)
RecurrenceTable[{a[0]==0, a[1]==1, a[n] == a[n-1]^2 - 2*a[n-1]*a[n-2]+a[n-2]^2 + a[n-1] + 1}, a, {n, 0, 10}] (* Vaclav Kotesovec, Dec 18 2014 *)
PROG
(PARI) a(n)=if(n>1, a(n-1)^2-2*a(n-1)*a(n-2)+a(n-2)^2+a(n-1)+1, n) \\ Charles R Greathouse IV, Dec 29 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Jonathan Vos Post, Jan 08 2007
STATUS
approved