|
| |
|
|
A106999
|
|
Primes of the form 2x^2+xy+12y^2, with x and y any integer.
|
|
0
| |
|
|
2, 13, 67, 103, 107, 113, 173, 227, 307, 317, 337, 383, 433, 487, 607, 673, 773, 887, 907, 977, 983, 1093, 1097, 1117, 1193, 1237, 1283, 1427, 1433, 1447, 1523, 1627, 1663, 1723, 1823, 1877, 1933, 1997, 2017, 2143, 2237, 2293, 2377, 2383, 2393
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Discriminant=-95. See A106856 for more information.
|
|
|
MATHEMATICA
| f[x_, y_]:=2*x^2+x*y+12*y^2; lst={}; Do[Do[p=f[x, y]; If[PrimeQ[p], AppendTo[lst, p]], {y, -5!, 6!}], {x, -5!, 6!}]; Take[Union[lst], 5! ] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jul 04 2009]
Union[QuadPrimes[2, 1, 12, 10000], QuadPrimes[2, -1, 12, 10000]] (* see A106856 *)
|
|
|
CROSSREFS
| Sequence in context: A037640 A137967 A045764 * A054566 A038144 A097977
Adjacent sequences: A106996 A106997 A106998 * A107000 A107001 A107002
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
| |
|
|
