|
%I #7 Sep 08 2022 08:45:37
%S 181,653,1361,1597,1951,2069,2423,2659,2777,4547,4783,6199,6317,6553,
%T 6907,8087,8677,9739,9857,10093,10211,11273,11863,11981,12689,13043,
%U 13397,13633,13751,14341,14813,16111,16229,16937,17291,17881,18353,20123,20359,20477
%N Primes congruent to 4 mod 59.
%H Vincenzo Librandi, <a href="/A142731/b142731.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[2400]], MemberQ[{4}, Mod[#, 59]] &] (* _Vincenzo Librandi_, Sep 02 2012 *)
%o (Magma) [p: p in PrimesUpTo(21000) | p mod 59 eq 4 ]; // _Vincenzo Librandi_, Sep 02 2012
%Y A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
