|
| |
|
|
A107010
|
|
Primes of the form 5x^2+xy+5y^2, with x and y any integer.
|
|
0
| |
|
|
5, 11, 23, 47, 53, 59, 71, 89, 113, 137, 179, 191, 251, 257, 269, 311, 317, 353, 383, 389, 401, 419, 443, 449, 467, 509, 521, 587, 599, 617, 641, 647, 653, 683, 719, 773, 797, 839, 863, 881, 911, 929, 947, 971, 977, 983, 1013, 1049, 1061, 1103, 1109
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Discriminant=-99. See A106856 for more information.
|
|
|
MATHEMATICA
| f[x_, y_]:=5*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 06 2009]
Union[QuadPrimes[5, 1, 5, 10000], QuadPrimes[5, -1, 5, 10000]] (* see A106856 *)
|
|
|
CROSSREFS
| Sequence in context: A118439 A156109 A192954 * A175942 A181669 A052940
Adjacent sequences: A107007 A107008 A107009 * A107011 A107012 A107013
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| T. D. Noe (noe(AT)sspectra.com), May 09 2005
|
| |
|
|
