|
|
A107204
|
|
Primes of the form 5x^2 + 18y^2.
|
|
1
|
|
|
5, 23, 167, 197, 263, 293, 317, 653, 677, 773, 863, 887, 1277, 1487, 1493, 1583, 1607, 1733, 1823, 1877, 1997, 2063, 2423, 2663, 2687, 2837, 2903, 2957, 3023, 3167, 3413, 3527, 3533, 3623, 3797, 4007, 4133, 4373, 4397, 4493, 4583, 4733
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Discriminant=-360. See A107132 for more information.
|
|
LINKS
|
|
|
MATHEMATICA
|
QuadPrimes2[5, 0, 18, 10000] (* see A106856 *)
|
|
PROG
|
(PARI) list(lim)=my(v=List(), w, t); for(x=1, sqrtint(lim\5), w=5*x^2; for(y=0, sqrtint((lim-w)\18), if(isprime(t=w+18*y^2), listput(v, t)))); Set(v) \\ Charles R Greathouse IV, Feb 10 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|