login
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
OFFSET
1,1
COMMENTS
{7} UNION A045392.
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
Sequence in context: A336786 A106020 A248602 * A244576 A089176 A049232
KEYWORD
nonn,easy
STATUS
approved