A142670 Primes congruent to 8 mod 57.
179, 293, 521, 863, 977, 1091, 1319, 1433, 1889, 2003, 2459, 2687, 2801, 3257, 3371, 4283, 4397, 4967, 5081, 5309, 5651, 5879, 6221, 6449, 6563, 6791, 7019, 7247, 7589, 7703, 7817, 8273, 8387, 8501, 9413, 10211, 10667, 10781, 11351, 11579, 11807, 12149
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[p: p in PrimesUpTo(13000) | p mod 57 eq 8 ]; // Vincenzo Librandi, Sep 01 2012
-
Mathematica
Select[Prime[Range[2300]], MemberQ[{8}, Mod[#, 57]] &] (* Vincenzo Librandi, Sep 01 2012 *) Select[Range[8,12500,57],PrimeQ] (* Harvey P. Dale, Nov 23 2023 *)