A102732 Primes of the form 13n+5.
5, 31, 83, 109, 239, 317, 421, 499, 577, 733, 811, 863, 941, 967, 1019, 1097, 1123, 1201, 1279, 1409, 1487, 1669, 1721, 1747, 1877, 2111, 2137, 2267, 2293, 2371, 2423, 2579, 2657, 2683, 2917, 2969, 3203, 3229, 3307, 3359, 3463, 3541, 3593, 3671, 3697
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A144562. - Vincenzo Librandi, Jan 17 2009
Programs
-
Magma
[n: n in PrimesUpTo(3800) | IsDivisibleBy(n-5,13)]; // Bruno Berselli, Apr 05 2011
-
Magma
[ a: n in [0..350] | IsPrime(a) where a is 13*n +5 ]; // Vincenzo Librandi, Apr 06 2011
-
Mathematica
lst={};Do[p=13*n+5;If[PrimeQ[p],AppendTo[lst,p]],{n,0,4*5!}];lst (* Vladimir Joseph Stephan Orlovsky, Jan 27 2009 *) Select[Table[13n+5,{n,0,1000}],PrimeQ] (* Vincenzo Librandi, Aug 01 2012 *)