login
A045465
Primes congruent to {0, 1} mod 7.
3
7, 29, 43, 71, 113, 127, 197, 211, 239, 281, 337, 379, 421, 449, 463, 491, 547, 617, 631, 659, 673, 701, 743, 757, 827, 883, 911, 953, 967, 1009, 1051, 1093, 1163, 1289, 1303, 1373, 1429, 1471, 1499, 1583
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[200]], MemberQ[{0, 1}, Mod[#, 7]]&] (* Vincenzo Librandi, Aug 13 2012 *)
PROG
(Magma)[ p: p in PrimesUpTo(2000) | p mod 7 in {0, 1} ]; // Vincenzo Librandi, Aug 13 2012
CROSSREFS
KEYWORD
nonn,easy
STATUS
approved