A142555 Primes congruent to 25 mod 53.
131, 449, 661, 1297, 1721, 1933, 2039, 2251, 2357, 2887, 3947, 4159, 4583, 5113, 5431, 5749, 6067, 6173, 6491, 6703, 7127, 8081, 8293, 8929, 9883, 10837, 11261, 11579, 11897, 12109, 13063, 13381, 13487, 14653, 14759, 15077, 15289, 15607, 16349, 16561, 16879
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[p: p in PrimesUpTo(20000) | p mod 53 eq 25]; // Vincenzo Librandi, Aug 30 2012
-
Mathematica
Select[Prime[Range[2600]], MemberQ[{25}, Mod[#, 53]] &] (* Vincenzo Librandi, Aug 30 2012 *) Select[Range[25,17000,53],PrimeQ] (* Harvey P. Dale, Jul 27 2013 *)
-
PARI
is(n)=isprime(n) && n%53==25 \\ Charles R Greathouse IV, Jul 03 2016
Formula
a(n) ~ 52n log n. - Charles R Greathouse IV, Jul 03 2016