OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
nxt[{s_, k_}]:={24s+k+1, k+1}; Transpose[Select[NestList[nxt, {1, 1}, 1000], Divisible[ #[[1]], #[[2]]]&]][[2]] (* Harvey P. Dale, Apr 05 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved