A045368 Primes congruent to {2, 5} mod 7.
2, 5, 19, 23, 37, 47, 61, 79, 89, 103, 107, 131, 149, 163, 173, 191, 229, 233, 257, 271, 313, 317, 331, 359, 373, 383, 397, 401, 439, 443, 457, 467, 499, 509, 523, 541, 569, 593, 607, 653, 677, 691, 709, 719, 733
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ p: p in PrimesUpTo(1500) | p mod 7 in {2, 5} ]; // Vincenzo Librandi, Aug 06 2012
-
Mathematica
Select[Prime[Range[200]],MemberQ[{2,5},Mod[#,7]]&] (* Harvey P. Dale, Apr 28 2012 *)