|
|
A102852
|
|
Primes whose squares are congruent to 5 (modulo 19).
|
|
0
|
|
|
29, 47, 67, 181, 199, 257, 313, 389, 409, 503, 523, 541, 599, 617, 751, 769, 827, 883, 941, 997, 1093, 1187, 1283, 1301, 1321, 1453, 1511, 1549, 1567, 1663, 1777, 1871, 2081, 2099, 2137, 2213, 2251, 2309, 2347, 2423, 2441, 2593, 2689, 2707, 2803, 2879
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Prime/@Select[Range[420], Mod[Prime[#]^2, 19]==5&] (* James C. McMahon, Jan 11 2024 *)
|
|
PROG
|
(PARI) isok(p) = isprime(p) && (Mod(p, 19)^2==5); \\ Michel Marcus, Jan 11 2024
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Feb 28 2005
|
|
STATUS
|
approved
|
|
|
|