A136063 Mother primes of order 4.
19, 37, 109, 163, 199, 271, 379, 523, 541, 631, 739, 919, 1009, 1171, 1459, 1549, 1621, 1783, 1999, 2053, 2089, 2143, 2161, 2251, 2521, 2539, 2791, 2971, 3169, 3673, 3889, 3943, 4159, 4483, 4519, 4861, 5059, 5113, 5563, 5779, 5869, 5923, 6211, 6301, 6373
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
n = 4; a = {}; Do[If[PrimeQ[(Prime[k] + 2n)/(2n + 1)], AppendTo[a, Prime[k]]], {k, 1, 1500}]; a
Comments