|
Search: id:A106886
|
|
|
| A106886 |
|
Primes of the form 2x^2+xy+5y^2, with x and y any integer. |
|
+0
1
|
|
| 2, 5, 11, 41, 47, 59, 71, 83, 89, 137, 149, 167, 197, 227, 239, 281, 293, 317, 353, 359, 383, 401, 431, 449, 461, 479, 509, 557, 587, 593, 617, 683, 743, 761, 773, 821, 827, 839, 863, 929, 941, 947, 977, 983, 1019, 1061, 1097, 1103, 1151, 1163, 1181, 1217
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Discriminant=-39. See A106856 for more information.
|
|
MATHEMATICA
|
f[x_, y_]:=2*x^2+x*y+5*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, 5, 10000], QuadPrimes[2, -1, 5, 10000]] (* see A106856 *)
|
|
CROSSREFS
|
Sequence in context: A001344 A056302 A065850 this_sequence A007700 A071313 A128231
Adjacent sequences: A106883 A106884 A106885 this_sequence A106887 A106888 A106889
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
|
|
Search completed in 0.002 seconds
|
