OFFSET
0,2
MATHEMATICA
nxt[{a_, b_}]:={b, Floor[b*GoldenRatio]+a}; NestList[nxt, {0, 2}, 30][[All, 1]] (* Harvey P. Dale, Apr 11 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved