A142802 Primes congruent to 4 mod 61.
431, 797, 919, 1163, 2017, 2383, 2749, 3359, 3847, 4091, 4457, 5189, 6043, 6287, 6653, 7019, 7507, 7873, 8117, 8849, 8971, 9337, 10069, 10313, 11411, 11777, 12143, 13241, 13729, 14461, 14827, 15193, 15559, 15803, 16657, 16901, 17389, 18121, 18731, 19219
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A000040.
Programs
-
Magma
[p: p in PrimesUpTo(22000) | p mod 61 eq 4 ]; // Vincenzo Librandi, Sep 05 2012
-
Mathematica
Select[Prime[Range[2700]], MemberQ[{4}, Mod[#, 61]] &] (* Vincenzo Librandi, Sep 05 2012 *) Select[Range[4,20000,61],PrimeQ] (* Harvey P. Dale, Dec 09 2013 *)