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,1

Links

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

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 *)

Prog

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

Crossrefs

Sequence in context: A281712 A106942 A211621 * A094068 A084105 A024386

Adjacent sequences: A100199 A100200 A100201 * A100203 A100204 A100205

Keyword

nonn,easy

Author

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

Status

approved