|
| |
|
|
A106957
|
|
Primes of the form 4x^2+xy+5y^2, with x and y any integer.
|
|
0
| |
|
|
5, 19, 23, 67, 73, 97, 131, 151, 239, 269, 277, 281, 337, 347, 421, 431, 433, 439, 557, 569, 593, 599, 641, 643, 683, 733, 761, 773, 787, 839, 857, 887, 911, 997, 1013, 1021, 1049, 1063, 1069, 1117, 1129, 1171, 1229, 1249, 1283, 1319, 1381, 1427
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Discriminant=-79. See A106856 for more information.
|
|
|
MATHEMATICA
| f[x_, y_]:=4*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[4, 1, 5, 10000], QuadPrimes[4, -1, 5, 10000]] (* see A106856 *)
|
|
|
CROSSREFS
| Sequence in context: A146509 A062340 A167766 * A022143 A004623 A018475
Adjacent sequences: A106954 A106955 A106956 * A106958 A106959 A106960
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
| |
|
|
