

A100202


Primes of the form 13*k + 3.


12



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
(list;
graph;
refs;
listen;
history;
text;
internal format)



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.osakau.ac.jp), Dec 27 2004


STATUS

approved



