OFFSET
0,3
FORMULA
a(n) ~ 1/2 * c^(2^n), where c = 1.5761071725603835806427292143532632951057735784139134374711... . - Vaclav Kotesovec, Jan 19 2015
MATHEMATICA
RecurrenceTable[{a[n]==2*a[n-1]^2+a[n-2], a[0]==1, a[1]==1}, a, {n, 0, 10}] (* Vaclav Kotesovec, Jan 19 2015 *)
PROG
(PARI) a(n)=if(n<0, -a(-1-n), if(n<2, 1, 2*a(n-1)^2+a(n-2)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Michael Somos, May 22 2005
STATUS
approved