|
%I #13 Sep 08 2022 08:45:35
%S 5,251,661,743,907,1153,1399,1481,1973,2137,2383,2711,2957,3121,3203,
%T 3449,3613,4597,4679,5171,5417,5581,5827,6073,7057,7549,7877,8123,
%U 8287,8369,8779,8861,10009,10091,10337,10501,10993,11239,11321,11731,11813,13043
%N Primes congruent to 5 mod 41.
%H Vincenzo Librandi, <a href="/A142202/b142202.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) ~ 40n log n. - _Charles R Greathouse IV_, Jul 03 2016
%t Select[Range[5,30000,41],PrimeQ] (* _Vladimir Joseph Stephan Orlovsky_, May 17 2011 *)
%t Select[Prime[Range[50000]],MemberQ[{5},Mod[#,41]]&] (* _Vincenzo Librandi_, Aug 23 2012 *)
%o (Magma) [p: p in PrimesUpTo(14000) | p mod 41 eq 5 ]; // _Vincenzo Librandi_, Aug 23 2012
%o (PARI) is(n)=isprime(n) && n%41==5 \\ _Charles R Greathouse IV_, Jul 03 2016
%Y Cf. A000040, A059236, A142199, A142200, A142201.
%K nonn,easy
%O 1,1
%A _N. J. A. Sloane_, Jul 11 2008
|
