A102851 Primes of the form 19n + 5.
5, 43, 157, 233, 271, 347, 461, 499, 613, 727, 1031, 1069, 1259, 1297, 1373, 1487, 1601, 1753, 1867, 2399, 2437, 2551, 2741, 2969, 3083, 3121, 3463, 3539, 3691, 3767, 3881, 3919, 4261, 4337, 4451, 4603, 4679, 4793, 4831, 5021, 5059, 5477, 5591, 5743
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[ a: n in [0..400] | IsPrime(a) where a is 19*n+5 ]; // Vincenzo Librandi, Jul 19 2012
-
Mathematica
Select[Range[5,5000,19],PrimeQ[#]&] (* Vladimir Joseph Stephan Orlovsky, Mar 31 2011*) Select[Table[19*n+5,{n,0,1500}],PrimeQ] (* Vincenzo Librandi, Jul 19 2012 *)