|
%I #11 Feb 27 2014 04:53:06
%S 2,3,7,55,255,478,663,984,1237,1955,3021,3214,8312,13519,38267,40805,
%T 45400,47444,48835,55269,56758,59032,66067,92141,93063,103620,106611,
%U 108602,112713,140874,151335,163314,178215,183330,211350,235410,244165,265160,275971
%N a(n) is the number of primes occurring between A053182(n) and A053183(n) (excluding the endpoints).
%H Giovanni Resta, <a href="/A238399/b238399.txt">Table of n, a(n) for n = 1..2500</a>
%t (PrimePi[#^2 + #] - PrimePi[#]) & /@ Select[Prime@Range@500, PrimeQ[#^2 + # + 1] &] (* _Giovanni Resta_, Feb 27 2014 *)
%Y Cf. A053182, A053183
%K nonn
%O 1,1
%A _Torlach Rush_, Feb 26 2014
%E a(33)-a(39) from _Giovanni Resta_, Feb 27 2014
|
