|
%I #9 Sep 08 2022 08:45:37
%S 43,211,379,491,547,659,827,883,1051,1163,1499,1667,1723,2003,2339,
%T 2731,2843,3011,3067,3347,3571,3739,3851,3907,4019,4243,4523,4691,
%U 5419,5531,5867,5923,6091,6203,6427,6763,7043,7211,7547,7603,7883,8219,8387,8443
%N Primes congruent to 43 mod 56.
%H Vincenzo Librandi, <a href="/A142659/b142659.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[1300]], MemberQ[{43}, Mod[#, 56]] &] (* _Vincenzo Librandi_, Sep 01 2012 *)
%t Select[Range[43,8500,56],PrimeQ] (* _Harvey P. Dale_, Jul 23 2021 *)
%o (Magma) [p: p in PrimesUpTo(10000) | p mod 56 eq 43 ]; // _Vincenzo Librandi_, Sep 01 2012
%Y Cf. A000040.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
