login
A045424
Primes congruent to {0, 1, 3} mod 7.
1
3, 7, 17, 29, 31, 43, 59, 71, 73, 101, 113, 127, 157, 197, 199, 211, 227, 239, 241, 269, 281, 283, 311, 337, 353, 367, 379, 409, 421, 449, 463, 479, 491, 521, 547, 563, 577, 617, 619, 631, 647, 659, 661, 673, 701
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], MemberQ[{0, 1, 3}, Mod[#, 7]]&] (* Vincenzo Librandi, Aug 13 2012 *)
PROG
(Magma) [ p: p in PrimesUpTo(1000) | p mod 7 in {0, 1, 3} ]; // Vincenzo Librandi, Aug 13 2012
CROSSREFS
Cf. A000040.
Sequence in context: A042825 A076033 A029519 * A106968 A191081 A079779
KEYWORD
nonn,easy
STATUS
approved