A045422 Primes congruent to {0, 1, 3, 6} mod 7.

3, 7, 13, 17, 29, 31, 41, 43, 59, 71, 73, 83, 97, 101, 113, 127, 139, 157, 167, 181, 197, 199, 211, 223, 227, 239, 241, 251, 269, 281, 283, 293, 307, 311, 337, 349, 353, 367, 379, 409, 419, 421, 433, 449, 461, 463

Offset

1,1

Links

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

Mathematica

Select[Prime[Range[200]], MemberQ[{0, 1, 3, 6}, Mod[#, 7]]&] (* Vincenzo Librandi, Aug 13 2012 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A097957 A071774 A019403 * A191071 A180543 A218833

Adjacent sequences: A045419 A045420 A045421 * A045423 A045424 A045425

Keyword

nonn,easy

Author

N. J. A. Sloane

Status

approved