OFFSET
0,3
LINKS
Harry J. Smith, Table of n, a(n) for n=0,...,24
MATHEMATICA
RecurrenceTable[{a[0]==0, a[1]==1, a[n]==a[n-2]^2+2}, a, {n, 20}] (* Harvey P. Dale, Aug 19 2013 *)
PROG
(PARI) a(n)=if(n<2, n>0, 2+a(n-2)^2) /* Michael Somos, Mar 25 2006 */
(PARI) { for (n=0, 24, if (n>1, a=a2^2 + 2; a2=a1; a1=a, if (n, a=a1=1, a=a2=0)); write("b065653.txt", n, " ", a) ) } \\ Harry J. Smith, Oct 25 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Nov 10 2001
EXTENSIONS
One more term from Harvey P. Dale, Aug 19 2013
STATUS
approved