OFFSET
1,2
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
MATHEMATICA
nxt[n_] := Flatten[5 # + {-3, -1} & /@ n]; Union[Flatten[NestList[nxt, {1}, 5]]] (* G. C. Greubel, Aug 28 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 02 2009
STATUS
approved