A042992 Primes congruent to {0, 2, 3, 5, 6} (mod 7).
2, 3, 5, 7, 13, 17, 19, 23, 31, 37, 41, 47, 59, 61, 73, 79, 83, 89, 97, 101, 103, 107, 131, 139, 149, 157, 163, 167, 173, 181, 191, 199, 223, 227, 229, 233, 241, 251, 257, 269, 271, 283, 293, 307, 311, 313, 317, 331, 349, 353, 359, 367, 373, 383, 397, 401
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..6000
Programs
-
Magma
[p: p in PrimesUpTo(500) | p mod 7 in [0, 2, 3, 5, 6]]; // Vincenzo Librandi, Aug 09 2012
-
Mathematica
Select[Prime[Range[120]], MemberQ[{0, 2, 3, 5, 6}, Mod[#, 7]] &] (* Vladimir Joseph Stephan Orlovsky, Feb 18 2012 *)
Comments