%I #8 Aug 03 2014 14:01:16

%S 2,2,3,5,5,7,7,17,13,11,11,13,13,23,19,17,17,19,19,29,37,23,23,73,29,

%T 107,31,29,29,31,31,41,37,43,71,37,37,47,43,41,41,43,43,53,61,47,47,

%U 73,53,59,67,53,53,79,59,137,61,59,59,61,61,71,67,73,101,67,67,149,73,71

%N Smallest prime which can be written as k^2 + n for k >= 0.

%F a(n) = A056897(n)+n = A056898(n)^2+n.

%F For p a prime: a(p)=p (and a(p-1)=p if p<>3).

%e a(8)=17 because 17=3^2+8.

%t Table[k = 0; While[p = n + k^2; ! PrimeQ[p], k++]; p, {n, 100}] (* _T. D. Noe_, Apr 01 2011 *)

%Y Cf. A000040, A002496, A056892-A056898.

%K nonn

%O 1,1

%A _Henry Bottomley_, Jul 05 2000

%E Example corrected by Harvey P. Dale, Apr 01 2011