OFFSET
0,3
COMMENTS
See A268497 for the actual record values.
PROG
(PARI) show(n, f="/tmp/b268496.txt", c=0, a=0, u=[a-1])={for(n=1, n, a>=u[#u]&&if(f, write(f, c++-1, " "n-1), print1(n-1", ")); u=setunion(u, [a]); while(#u>1&&u[2]==u[1]+1, u=u[^1]); for(k=u[1]+1, 9e9, !setsearch(u, k) && isprime(a*a+k) && (a=k) && break))}
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Feb 09 2016
STATUS
approved