login
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
OFFSET
1,1
LINKS
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
KEYWORD
nonn,easy
AUTHOR
Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), Dec 27 2004
STATUS
approved