

A138368


Primes of the form k^2 + 12.


1



13, 37, 61, 181, 373, 541, 853, 1237, 1381, 1693, 1861, 2221, 3037, 3733, 7237, 7933, 8293, 9421, 12781, 14173, 14653, 16141, 19333, 25933, 27901, 28573, 30637, 34981, 36493, 38821, 41221, 44533, 46237, 49741, 52453, 60037, 70237, 73453, 87037
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Table of n, a(n) for n=1..39.


MATHEMATICA

Intersection[Table[n^2+12, {n, 0, 10^2}], Prime[Range[9*10^3]]] ...or... For[i=12, i<=12, 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+12] // Vincenzo Librandi, Nov 24 2010


CROSSREFS

Sequence in context: A031339 A034938 A139530 * A118071 A307192 A147207
Adjacent sequences: A138365 A138366 A138367 * A138369 A138370 A138371


KEYWORD

nonn


AUTHOR

Vladimir Joseph Stephan Orlovsky, May 07 2008


EXTENSIONS

More terms from Vincenzo Librandi, Apr 28 2010


STATUS

approved



