A045404 Primes congruent to {3, 4, 5, 6} mod 7.
3, 5, 11, 13, 17, 19, 31, 41, 47, 53, 59, 61, 67, 73, 83, 89, 97, 101, 103, 109, 131, 137, 139, 151, 157, 167, 173, 179, 181, 193, 199, 223, 227, 229, 241, 251, 257, 263, 269, 271, 277, 283, 293, 307, 311, 313, 347
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[ p: p in PrimesUpTo(400) | p mod 7 in {3..6} ]; // Vincenzo Librandi, Aug 12 2012
-
Mathematica
Select[Prime[Range[3000]],MemberQ[{3,4,5,6},Mod[#,7]]&] (* Vincenzo Librandi, Aug 12 2012 *)