OFFSET
1,3
COMMENTS
The terms have an interesting factorization pattern, often sharing factors.
MATHEMATICA
nxt[{n_, a_, b_}]:={n+1, b, (a+Fibonacci[n-1])(b+Fibonacci[n])}; Join[{1}, Transpose[ NestList[nxt, {2, 1, 1}, 10]][[3]]] (* Harvey P. Dale, Jun 16 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Gerald McGarvey, Aug 08 2004
STATUS
approved