%I #16 Sep 08 2022 08:45:34
%S 67,277,353,487,563,773,907,983,1117,1193,1327,1613,1747,1823,2243,
%T 2377,2663,2797,3083,3217,3637,3847,3923,4057,4133,4973,5107,5393,
%U 5527,5737,5813,6367,6577,6653,6863,6997,7207,7283,7417,7703,8123,8467,8543,8677
%N Primes congruent to 67 or 143 mod 210.
%H Vincenzo Librandi, <a href="/A140731/b140731.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[1100]], MemberQ[{67, 143}, Mod[#, 210]] &] (* _Vincenzo Librandi_, Aug 15 2012 *)
%o (Magma) [p: p in PrimesUpTo(9000)|p mod 210 in {67,143}] // _Vincenzo Librandi_, Dec 18 2010
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _Juri-Stepan Gerasimov_, Jul 28 2008
%E Entries checked by _R. J. Mathar_, Apr 27 2010
|