|
| |
|
|
A106996
|
|
Primes of the form 3x^2+xy+8y^2, with x and y any integer.
|
|
0
| |
|
|
3, 37, 53, 97, 127, 167, 193, 223, 257, 293, 373, 523, 547, 563, 677, 683, 743, 787, 797, 827, 857, 863, 877, 953, 1063, 1123, 1153, 1307, 1367, 1553, 1637, 1667, 1693, 1747, 1777, 1913, 2003, 2027, 2083, 2203, 2207, 2273, 2333, 2347, 2423, 2617
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Discriminant=-95. See A106856 for more information.
|
|
|
MATHEMATICA
| f[x_, y_]:=3*x^2+x*y+8*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[3, 1, 8, 10000], QuadPrimes[3, -1, 8, 10000]] (* see A106856 *)
|
|
|
CROSSREFS
| Sequence in context: A037000 A042333 A106103 * A047691 A091824 A139842
Adjacent sequences: A106993 A106994 A106995 * A106997 A106998 A106999
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
| |
|
|
