A124192 Numbers k for which 8*k + 3 and 8*k + 5 are twin primes.
0, 1, 7, 13, 22, 28, 43, 52, 82, 103, 127, 136, 178, 181, 202, 208, 223, 241, 253, 283, 292, 406, 412, 421, 433, 442, 481, 502, 511, 532, 568, 598, 616, 637, 706, 733, 766, 787, 832, 847, 853, 868, 901, 913, 916, 943
Offset: 1
Keywords
Examples
0 is a term since 8*0 + 3 = 3 and 8*0 + 5 = 5 are twin primes.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[k:k in [0..1000]|IsPrime(8*k+3) and IsPrime(8*k+5)]; // Marius A. Burtea, Dec 19 2019
-
Mathematica
Do[If[PrimeQ[8n + 3] && PrimeQ[8n + 5], Print[n]], {n, 1, 1000}]
Extensions
a(1) inserted by Amiram Eldar, Dec 19 2019