A045399 Primes congruent to {0, 3, 5, 6} mod 7.
3, 5, 7, 13, 17, 19, 31, 41, 47, 59, 61, 73, 83, 89, 97, 101, 103, 131, 139, 157, 167, 173, 181, 199, 223, 227, 229, 241, 251, 257, 269, 271, 283, 293, 307, 311, 313, 349, 353, 367, 383, 397, 409, 419, 433, 439
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, 3, 5, 6} ]; // Vincenzo Librandi, Aug 12 2012
-
Mathematica
Select[Prime[Range[300]],MemberQ[{0,3,5,6},Mod[#,7]]&] (* Vincenzo Librandi, Aug 12 2012 *)
Comments