A045400 Primes congruent to {0, 1, 3, 5} mod 7.

3, 5, 7, 17, 19, 29, 31, 43, 47, 59, 61, 71, 73, 89, 101, 103, 113, 127, 131, 157, 173, 197, 199, 211, 227, 229, 239, 241, 257, 269, 271, 281, 283, 311, 313, 337, 353, 367, 379, 383, 397, 409, 421, 439, 449, 463

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[300]], MemberQ[{0, 1, 3, 5}, Mod[#, 7]]&] (* Vincenzo Librandi, Aug 12 2012 *)

Prog

(Magma) [ p: p in PrimesUpTo(600) | p mod 7 in {0, 1, 3, 5} ]; // Vincenzo Librandi, Aug 12 2012

Crossrefs

Cf. A000040.

Sequence in context: A110358 A038971 A210479 * A163425 A191038 A299298

Adjacent sequences: A045397 A045398 A045399 * A045401 A045402 A045403

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved