OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..230
MATHEMATICA
nxt[{s_, n_}]:={18s+n+1, n+1}; Transpose[Select[NestList[nxt, {1, 1}, 5300], Divisible[ First[#], Last[#]]&]][[2]] (* Harvey P. Dale, Jun 11 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved