OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..500
MATHEMATICA
nxt[{n_, a_}]:={n+1, 25a+n+1}; Flatten[Position[NestList[nxt, {1, 1}, 400], _?(Divisible[Last[#], First[#]]&), {1}, Heads->False]] (* Harvey P. Dale, Oct 15 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved