OFFSET
1,2
COMMENTS
PROG
(PARI) print1(1, ", "); v=[1]; k=1; while(#v<=10^3, if(isprime(k^2+v[#v]^2)&&!vecsearch(vecsort(v), k), v=concat(v, k); if(k==#v, print1(k, ", ")); k=0); k++); \\ Derek Orr, Jun 08 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 16 2010
STATUS
approved