|
%I #18 Jan 24 2023 06:56:06
%S 61,149,271,359,569,691,1321,1409,1531,1619,1741,1951,2039,2161,2371,
%T 2459,2791,2879,3001,3089,3299,3631,3719,3929,4051,4139,4261,4349,
%U 5101,5189,5399,5521,6029,6151,6361,6449,6571,6659,6781,6869,6991,7079,7411
%N Primes congruent to 61 or 149 mod 210.
%H Vincenzo Librandi, <a href="/A140726/b140726.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[1000]], MemberQ[{61, 149}, Mod[#, 210]] &] (* _Vincenzo Librandi_; Aug 15 2012 *)
%o (Magma) [p: p in PrimesUpTo(9000)|p mod 210 in {61,149}] // _Vincenzo Librandi_, Dec 18 2010
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _Juri-Stepan Gerasimov_, Jul 28 2008
%E Corrected (4691 removed) by _R. J. Mathar_, Apr 27 2010
|
