|
Search: id:A106996
|
|
|
| A106996 |
|
Primes of the form 3x^2+xy+8y^2, with x and y any integer. |
|
+0
1
|
|
| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
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 this_sequence A047691 A091824 A139842
Adjacent sequences: A106993 A106994 A106995 this_sequence A106997 A106998 A106999
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
|
|
Search completed in 0.002 seconds
|
