A141970 Primes congruent to 13 mod 28.

13, 41, 97, 181, 293, 349, 433, 461, 601, 769, 797, 853, 881, 937, 1021, 1049, 1217, 1301, 1553, 1609, 1637, 1693, 1721, 1777, 1861, 1889, 1973, 2029, 2113, 2141, 2281, 2309, 2393, 2477, 2617, 2729, 2897, 2953, 3037, 3121, 3373, 3457, 3541, 3709, 3793, 3821

Offset

1,1

Links

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

Formula

a(n) ~ 12n log n. - Charles R Greathouse IV, Jul 03 2016

Mathematica

Select[Prime[Range[1500]], MemberQ[{13}, Mod[#, 28]]&] (* Vincenzo Librandi, Aug 17 2012 *)
Select[Range[13, 4000, 28], PrimeQ] (* Harvey P. Dale, May 08 2015 *)

Prog

(Magma) [p: p in PrimesUpTo(5000) | p mod 28 eq 13 ]; // Vincenzo Librandi, Aug 17 2012
(PARI) is(n)=isprime(n) && n%28==13 \\ Charles R Greathouse IV, Jul 03 2016

Crossrefs

Cf. A000040.

Sequence in context: A026918 A123972 A167585 * A305155 A355965 A231885

Adjacent sequences: A141967 A141968 A141969 * A141971 A141972 A141973

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved