|
%I #9 Sep 08 2022 08:45:37
%S 181,307,433,811,937,1063,1567,1693,2953,3079,3331,3457,3583,3709,
%T 4339,4591,4969,5347,5851,6229,6481,6607,6733,7237,7489,7741,7867,
%U 7993,8623,9001,9127,9631,9883,10009,10513,10639,10891,12277,12781,12907,13033,13159
%N Primes congruent to 55 mod 63.
%H Vincenzo Librandi, <a href="/A142920/b142920.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[2000]], MemberQ[{55}, Mod[#, 63]] &] (* _Vincenzo Librandi_, Sep 06 2012 *)
%t Select[Range[55,15000,63],PrimeQ] (* _Harvey P. Dale_, Nov 28 2019 *)
%o (Magma) [p: p in PrimesUpTo(14000) | p mod 63 eq 55 ] ; // _Vincenzo Librandi_, Sep 06 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
