OFFSET
1,1
EXAMPLE
a(8)=17 because 17=3^2+8.
MATHEMATICA
Table[k = 0; While[p = n + k^2; ! PrimeQ[p], k++]; p, {n, 100}] (* T. D. Noe, Apr 01 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Henry Bottomley, Jul 05 2000
EXTENSIONS
Example corrected by Harvey P. Dale, Apr 01 2011
STATUS
approved