|
|
A045383
|
|
Primes congruent to {0, 2} mod 7.
|
|
2
|
|
|
2, 7, 23, 37, 79, 107, 149, 163, 191, 233, 317, 331, 359, 373, 401, 443, 457, 499, 541, 569, 653, 709, 751, 821, 863, 877, 919, 947, 1031, 1087, 1129, 1171, 1213, 1283, 1297, 1367, 1381, 1409, 1423, 1451, 1493
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[700]], MemberQ[{0, 2}, Mod[#, 7]]&] (* Vincenzo Librandi, Aug 07 2012 *)
Select[Flatten[#+{0, 2}&/@(7*Range[0, 300])], PrimeQ] (* Harvey P. Dale, Oct 17 2021 *)
|
|
PROG
|
(Magma) [ p: p in PrimesUpTo(2000) | p mod 7 in {0, 2} ]; // Vincenzo Librandi, Aug 07 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|