|
%I #10 Sep 08 2022 08:45:37
%S 149,263,491,719,947,1061,1289,1973,2087,2543,2657,2999,3797,3911,
%T 4139,4253,4481,4937,5051,5279,5393,5507,5849,6761,7103,7331,7559,
%U 7673,7901,8243,8699,9041,9497,9839,10067,10181,10979,11093,11321,11549,11777,12119
%N Primes congruent to 35 mod 57.
%H Vincenzo Librandi, <a href="/A142687/b142687.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[3000]],Mod[#,57]==35&] (* _Harvey P. Dale_, Mar 13 2011 *)
%t Select[Prime[Range[2400]], MemberQ[{35}, Mod[#, 57]] &] (* _Vincenzo Librandi_, Sep 02 2012 *)
%o (Magma) [p: p in PrimesUpTo(13000) | p mod 57 eq 35 ]; // _Vincenzo Librandi_, Sep 02 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
