login
A142523
Primes congruent to 33 mod 52.
1
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
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
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jul 11 2008
STATUS
approved