A045338 Primes congruent to {2, 3, 4} mod 7.
2, 3, 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
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ p: p in PrimesUpTo(600) | p mod 7 in {2, 3, 4} ]; // Vincenzo Librandi, Aug 07 2012
-
Mathematica
Select[Prime[Range[300]],MemberQ[{2,3,4},Mod[#,7]]&] (* Vincenzo Librandi, Aug 07 2012 *)
-
PARI
select(n->n%7>1 && n%7<5, primes(60)) \\ Charles R Greathouse IV, Aug 07 2012
Formula
a(n) ~ 2n log n. - Charles R Greathouse IV, Aug 07 2012