A045464 Primes congruent to {0, 6} mod 7.
7, 13, 41, 83, 97, 139, 167, 181, 223, 251, 293, 307, 349, 419, 433, 461, 503, 587, 601, 643, 727, 769, 797, 811, 839, 853, 881, 937, 1021, 1049, 1063, 1091, 1217, 1231, 1259, 1301, 1399, 1427, 1483, 1511
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[ p: p in PrimesUpTo(1800) | p mod 7 in {0, 6} ]; // Vincenzo Librandi, Aug 13 2012
-
Mathematica
Select[Prime[Range[200]],MemberQ[{0,6},Mod[#,7]]&] (* Vincenzo Librandi, Aug 13 2012 *)
Formula
{7} UNION A045473. - R. J. Mathar, Apr 26 2008