|
%I #8 Sep 08 2022 08:45:16
%S 5,43,157,233,271,347,461,499,613,727,1031,1069,1259,1297,1373,1487,
%T 1601,1753,1867,2399,2437,2551,2741,2969,3083,3121,3463,3539,3691,
%U 3767,3881,3919,4261,4337,4451,4603,4679,4793,4831,5021,5059,5477,5591,5743
%N Primes of the form 19n + 5.
%H Vincenzo Librandi, <a href="/A102851/b102851.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[5,5000,19],PrimeQ[#]&] (* _Vladimir Joseph Stephan Orlovsky_, Mar 31 2011*)
%t Select[Table[19*n+5,{n,0,1500}],PrimeQ] (* _Vincenzo Librandi_, Jul 19 2012 *)
%o (Magma) [ a: n in [0..400] | IsPrime(a) where a is 19*n+5 ]; // _Vincenzo Librandi_, Jul 19 2012
%Y Cf. A105854, A141881, A141882, A141883.
%K nonn,easy
%O 1,1
%A Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Feb 28 2005
|
