A045370 Primes congruent to {0, 2, 4, 6} mod 7.

2, 7, 11, 13, 23, 37, 41, 53, 67, 79, 83, 97, 107, 109, 137, 139, 149, 151, 163, 167, 179, 181, 191, 193, 223, 233, 251, 263, 277, 293, 307, 317, 331, 347, 349, 359, 373, 389, 401, 419, 431, 433, 443, 457, 461

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• easy

Comments

A039705(A049084(a(n))) = even; complement of A045415. - Reinhard Zumkeller, Feb 25 2008

Links

• R. Zumkeller, Table of n, a(n) for n = 1..1001

Crossrefs

Cf. A045415, A045356, A137977.

Programs

Magma

[ p: p in PrimesUpTo(600) | p mod 7 in {0..6 by 2} ]; // Vincenzo Librandi, Aug 10 2012

Mathematica

Select[Prime[Range[300]],MemberQ[{0,2,4,6},Mod[#,7]]&] (* Vincenzo Librandi, Aug 10 2012 *)
Select[Prime[Range[110]], EvenQ[Mod[#, 7]] & ] (* Bruno Berselli, Aug 31 2012 *)