|
%I #19 Oct 30 2018 10:31:02
%S 11,101,181,191,271,281,461,541,631,641,811,821,911,991,1091,1171,
%T 1181,1361,1451,1531,1621,1721,1801,1811,1901,2081,2161,2251,2341,
%U 2351,2441,2521,2531,2621,2711,2791,2801,2971,3061,3251,3331,3511,3691,3701,3881
%N Primes that are both congruent to 1 mod 10 and congruent to 1 or 2 mod 9.
%F A030430 INTERSECT { A061237 UNION A061238 }.
%t nn=3881;Sort@Select[Join[Range[11,nn,90],Range[1,nn,90]],PrimeQ] (* _Zak Seidov_, Dec 27 2011 *)
%K nonn
%O 1,1
%A _Roger L. Bagula_, Jan 06 2004
%E Edited by _N. J. A. Sloane_, Feb 04 2008
|
