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

2, 7, 11, 13, 23, 29, 37, 41, 43, 53, 67, 71, 79, 83, 97, 107, 109, 113, 127, 137, 139, 149, 151, 163, 167, 179, 181, 191, 193, 197, 211, 223, 233, 239, 251, 263, 277, 281, 293, 307, 317, 331, 337, 347, 349, 359

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

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

Prog

(Magma) [p: p in PrimesUpTo(800) | p mod 7 in [0, 1, 2, 4, 6]]; // Vincenzo Librandi, Aug 10 2012

Crossrefs

Cf. A045416 (complement).

Sequence in context: A146315 A038892 A019346 * A157975 A339862 A045370

Adjacent sequences: A045366 A045367 A045368 * A045370 A045371 A045372

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved