A136059 Daughter primes of order 10.
3, 7, 11, 17, 19, 23, 31, 37, 43, 47, 53, 71, 83, 97, 103, 109, 127, 131, 137, 149, 173, 179, 199, 223, 229, 239, 263, 281, 283, 293, 307, 313, 317, 337, 349, 353, 367, 397, 419, 421, 439, 443, 461, 467, 479, 499, 547, 557, 571, 577, 593, 601, 613, 619, 641
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
n = 10; a = {}; Do[If[PrimeQ[(Prime[k] + 2n)/(2n + 1)], AppendTo[a, (Prime[k] + 2n)/(2n + 1)]], {k, 1, 1500}]; a
Comments