A100202 Primes of the form 13*k + 3.

3, 29, 107, 211, 263, 367, 419, 523, 601, 653, 757, 809, 887, 991, 1069, 1277, 1303, 1381, 1433, 1459, 1511, 1667, 1693, 1823, 1901, 1979, 2083, 2161, 2213, 2239, 2447, 2473, 2551, 2707, 2837, 3019, 3253, 3331, 3461, 3539, 3617, 3643, 3851, 3877, 3929

Offset: 1

Author

Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Dec 27 2004

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Programs

Magma

[ p: p in PrimesUpTo(11000) | p mod 13 eq 3 ]; // Vincenzo Librandi, Apr 07 2011

Mathematica

lst={};Do[p=13*n+3;If[PrimeQ[p],AppendTo[lst,p]],{n,0,5*5!}];lst (* Vladimir Joseph Stephan Orlovsky, Jan 27 2009 *)
Select[13*Range[0,400]+3,PrimeQ] (* Harvey P. Dale, Jul 07 2020 *)