%I #13 Sep 08 2022 08:45:33

%S 11,47,587,911,1307,2927,8111,9227,13007,14411,15887,20747,22511,

%T 32411,34607,41627,44111,54767,60527,72911,90011,104987,133967,152111,

%U 197147,207947,236207,254027,260111,318107,404507,427727,443567,467867,476111

%N Primes of the form k^2 + 11.

%H Harvey P. Dale, <a href="/A138362/b138362.txt">Table of n, a(n) for n = 1..1000</a>

%t Intersection[Table[n^2+11,{n,0,10^2}],Prime[Range[9*10^3]]] ...or... For[i=11,i<=11,a={};Do[If[PrimeQ[n^2+i],AppendTo[a,n^2+i]],{n,0,100}];Print["n^2+",i,",",a];i++ ]

%t Select[Range[0,700]^2+11,PrimeQ] (* _Harvey P. Dale_, Apr 27 2017 *)

%o (Magma) [ a: n in [0..900] | IsPrime(a) where a is n^2+11] // _Vincenzo Librandi_, Nov 24 2010

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, May 07 2008

%E More terms from _Vincenzo Librandi_, Apr 28 2010