A136089 Son primes of order 12.
5, 7, 13, 17, 19, 23, 41, 59, 61, 67, 79, 83, 101, 107, 109, 131, 137, 139, 163, 173, 181, 191, 199, 229, 233, 251, 257, 263, 277, 293, 307, 317, 347, 353, 359, 367, 373, 389, 397, 419, 431, 461, 467, 521, 523, 569, 577, 587, 607, 613, 653, 683, 691, 709, 727
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
n = 12; a = {}; Do[If[PrimeQ[(Prime[k] - 2n)/(2n + 1)], AppendTo[a, (Prime[k] - 2n)/(2n + 1)]], {k, 1, 1000}]; a
Comments