|
Search: id:A106957
|
|
|
| A106957 |
|
Primes of the form 4x^2+xy+5y^2, with x and y any integer. |
|
+0 1
|
|
| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
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 this_sequence A022143 A004623 A018475
Adjacent sequences: A106954 A106955 A106956 this_sequence A106958 A106959 A106960
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
|
|
Search completed in 0.002 seconds
|