A142548 Primes congruent to 18 mod 53.

71, 283, 389, 601, 919, 1237, 1873, 1979, 2297, 3251, 3463, 4099, 4523, 5477, 5689, 6007, 6113, 6961, 7703, 8233, 9187, 9293, 9929, 10141, 10247, 10459, 10883, 11519, 11731, 12049, 12473, 12791, 13003, 13109, 14593, 14699, 15017, 15971, 16183, 16607, 17137

Offset

1,1

Links

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

Formula

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

Mathematica

Select[Prime[Range[2600]], MemberQ[{18}, Mod[#, 53]] &] (* Vincenzo Librandi, Aug 29 2012 *)
Select[Range[18, 18000, 53], PrimeQ] (* Harvey P. Dale, Aug 23 2019 *)

Prog

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

Crossrefs

Cf. A000040.

Sequence in context: A114992 A158734 A126021 * A158738 A142143 A142739

Adjacent sequences: A142545 A142546 A142547 * A142549 A142550 A142551

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 11 2008

Status

approved