|
%I #9 Sep 08 2022 08:45:37
%S 3,491,613,857,1223,2687,3541,3907,4273,4517,4639,5737,5981,6469,7079,
%T 7933,8543,9397,10007,10739,10861,11471,11593,11959,12203,12569,13789,
%U 14033,14887,15131,15497,15619,16229,17327,17449,18059,18181,18913,19157,19889
%N Primes congruent to 3 mod 61.
%H Vincenzo Librandi, <a href="/A142801/b142801.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[2700]], MemberQ[{3}, Mod[#, 61]] &] (* _Vincenzo Librandi_, Sep 05 2012 *)
%o (Magma) [p: p in PrimesUpTo(20000) | p mod 61 eq 3 ]; // _Vincenzo Librandi_, Sep 05 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
