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