|
%I #9 Sep 08 2022 08:45:37
%S 59,311,563,941,1193,1319,1571,1697,1823,1949,2579,2957,3083,3209,
%T 3461,4091,4217,4721,4973,5099,5351,5477,5981,6359,6737,6863,8123,
%U 8501,8627,8753,9257,9887,10139,10391,11273,11399,11777,11903,12281,12659,12911,13037
%N Primes congruent to 59 mod 63.
%H Vincenzo Librandi, <a href="/A142922/b142922.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[2000]], MemberQ[{59}, Mod[#, 63]] &] (* _Vincenzo Librandi_, Sep 06 2012 *)
%t Select[Range[59,14000,63],PrimeQ] (* _Harvey P. Dale_, Sep 09 2020 *)
%o (Magma) [p: p in PrimesUpTo(14000) | p mod 63 eq 59 ] ; // _Vincenzo Librandi_, Sep 06 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
