A045383 Primes congruent to {0, 2} mod 7.

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

Author

N. J. A. Sloane

Keywords

• nonn
• easy

Comments

{7} UNION A045392.

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Programs

Magma

[ p: p in PrimesUpTo(2000) | p mod 7 in {0, 2} ]; // Vincenzo Librandi, Aug 07 2012

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 *)