|
%I #10 Sep 08 2022 08:45:37
%S 373,499,751,877,1129,1381,1759,2011,2137,2389,2767,3019,3271,4027,
%T 4153,4657,4783,4909,5413,5791,6043,6421,6547,6673,7177,7681,7933,
%U 8059,8311,8563,8689,8941,9067,9319,9697,9949,10453,10831,10957,11083,11587,11839
%N Primes congruent to 58 mod 63.
%H Vincenzo Librandi, <a href="/A142921/b142921.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[1500]],Mod[#,63]==58&] (* _Harvey P. Dale_, Nov 14 2011 *)
%t Select[Prime[Range[1800]], MemberQ[{58}, Mod[#, 63]] &] (* _Vincenzo Librandi_, Sep 06 2012 *)
%o (Magma) [p: p in PrimesUpTo(12000) | p mod 63 eq 58 ] ; // _Vincenzo Librandi_, Sep 06 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
