|
%I #7 Sep 08 2022 08:45:37
%S 241,367,619,997,1123,1249,1627,1753,1879,2131,2383,2887,3391,3517,
%T 3643,3769,4021,4273,4651,4903,5281,5407,5659,6037,6163,6793,7297,
%U 7549,7927,8053,8179,8431,9187,9439,9817,10069,10321,11329,11833,11959,12211,12589
%N Primes congruent to 52 mod 63.
%H Vincenzo Librandi, <a href="/A142918/b142918.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[1900]], MemberQ[{52}, Mod[#, 63]] &] (* _Vincenzo Librandi_, Sep 06 2012 *)
%o (Magma) [p: p in PrimesUpTo(13000) | p mod 63 eq 52 ] ; // _Vincenzo Librandi_, Sep 06 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
