1,1

a(1)=2, a(n)=a(n-1)^2+(-1)^n*a(n-1)+(-1)^n

a := proc(n) option remember; if n=1 then 2 else a(n-1)^2+(-1)^n*a(n-1)+(-1)^n fi end:

Cf. A109845.

Sequence in context: A008934 A084871 A122942 this_sequence A131682 A038052 A066383

Adjacent sequences: A109169 A109170 A109171 this_sequence A109173 A109174 A109175

nonn

Walter A. Kehowski (wkehowski(AT)cox.net), Aug 18 2005