OFFSET
1,2
PROG
(PARI) a(n)=if(n<0, 0, s=1; while(sum(k=1, s, isprime(k^2+n^2))<n, s++); s)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Aug 19 2002
STATUS
approved