A045332 Primes congruent to {0, 1, 2, 3} (mod 7).

2, 3, 7, 17, 23, 29, 31, 37, 43, 59, 71, 73, 79, 101, 107, 113, 127, 149, 157, 163, 191, 197, 199, 211, 227, 233, 239, 241, 269, 281, 283, 311, 317, 331, 337, 353, 359, 367, 373, 379, 401, 409, 421, 443, 449, 457

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn

Links

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

Programs

Magma

[p: p in PrimesUpTo(500) | p mod 7 in [0,1,2,3]]; // Vincenzo Librandi, Aug 04 2012

Mathematica

Select[Prime[Range[200]],MemberQ[{0,1,2,3},Mod[#,7]]&] (* Harvey P. Dale, Apr 20 2012 *)