A142517 Primes congruent to 21 mod 52.

73, 229, 281, 541, 593, 853, 1009, 1061, 1217, 1321, 1373, 1789, 1997, 2153, 2309, 2621, 2777, 3037, 3089, 3557, 4129, 4337, 4441, 4493, 4597, 4649, 4909, 5273, 5689, 5741, 5897, 6053, 6469, 6521, 6781, 6833, 7457, 7561, 7717, 7873, 8081, 8237, 8861, 9173

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]], Mod[#, 52]==21&] (* or *) Select[52*Range[200]+ 21, PrimeQ] (* Harvey P. Dale, Jan 23 2012 *)
Select[Prime[Range[1300]], MemberQ[{21}, Mod[#, 52]] &] (* Vincenzo Librandi, Aug 29 2012 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A142894 A141909 A296187 * A158711 A140039 A201715

Adjacent sequences: A142514 A142515 A142516 * A142518 A142519 A142520

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved