OFFSET
0,2
COMMENTS
MATHEMATICA
nxt[{a_, b_}]:={b, b(b-a)}; NestList[nxt, {1, 3}, 9][[All, 1]] (* Harvey P. Dale, Sep 05 2017 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonas Wallgren, Aug 22 2000
EXTENSIONS
More terms from Harvey P. Dale, Sep 05 2017
STATUS
approved