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

2, 5, 7, 11, 13, 19, 23, 29, 37, 41, 43, 47, 53, 61, 67, 71, 79, 83, 89, 97, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151, 163, 167, 173, 179, 181, 191, 193, 197, 211, 223, 229, 233, 239, 251, 257, 263, 271

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[100]], MemberQ[{0, 1, 2, 4, 5, 6}, Mod[#, 7]]&]  (* Harvey P. Dale, Apr 25 2011 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A303112 A182320 A119993 * A039675 A074833 A293859

Adjacent sequences: A045343 A045344 A045345 * A045347 A045348 A045349

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved