|
|
A138362
|
|
Primes of the form k^2 + 11.
|
|
3
|
|
|
11, 47, 587, 911, 1307, 2927, 8111, 9227, 13007, 14411, 15887, 20747, 22511, 32411, 34607, 41627, 44111, 54767, 60527, 72911, 90011, 104987, 133967, 152111, 197147, 207947, 236207, 254027, 260111, 318107, 404507, 427727, 443567, 467867, 476111
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
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++ ]
|
|
PROG
|
(Magma) [ a: n in [0..900] | IsPrime(a) where a is n^2+11] // Vincenzo Librandi, Nov 24 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|