A142523 Primes congruent to 33 mod 52.

137, 241, 293, 397, 449, 709, 761, 1021, 1229, 1489, 1697, 1801, 2113, 2269, 2477, 2633, 2789, 3049, 3257, 3361, 3413, 3517, 3673, 3881, 4297, 4349, 4817, 4973, 5077, 5233, 5441, 5701, 5857, 6221, 6481, 6637, 6689, 6793, 6949, 7001, 7417, 7573, 7937, 8093

Offset

1,1

Links

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

Formula

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

Mathematica

Select[Prime[Range[1300]], MemberQ[{33}, Mod[#, 52]] &] (* Vincenzo Librandi, Aug 29 2012 *)
Select[Range[33, 9000, 52], PrimeQ] (* Harvey P. Dale, Nov 24 2015 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A107164 A325085 A142497 * A307839 A307840 A142211

Adjacent sequences: A142520 A142521 A142522 * A142524 A142525 A142526

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved