A045325 Primes congruent to {0, 2, 3, 4} (mod 7).
2, 3, 7, 11, 17, 23, 31, 37, 53, 59, 67, 73, 79, 101, 107, 109, 137, 149, 151, 157, 163, 179, 191, 193, 199, 227, 233, 241, 263, 269, 277, 283, 311, 317, 331, 347, 353, 359, 367, 373, 389, 401, 409, 431, 443, 457, 479, 487, 499, 521, 541, 557, 563, 569, 571
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[ p: p in PrimesUpTo(600) | p mod 7 in {0, 2, 3, 4} ]; // Vincenzo Librandi, Aug 07 2012
-
Mathematica
Select[Prime[Range[120]],MemberQ[{0,2,3,4},Mod[#,7]]&] (* Harvey P. Dale, Mar 15 2011 *)
Extensions
More terms from Alvin Hoover Belt, Apr 27 2009