A171518 Primes p such that 3*p-+8 are primes.
5, 7, 13, 17, 53, 73, 83, 113, 127, 157, 193, 223, 277, 347, 367, 433, 613, 647, 673, 743, 797, 907, 937, 1117, 1217, 1373, 1427, 1483, 1543, 1597, 1637, 1667, 1877, 1933, 2027, 2237, 2297, 2447, 2647, 2687, 2843, 3083, 3137, 3613, 3797, 4073, 4463, 4483
Offset: 1
Keywords
Examples
5 is in the sequence since 3*5-8=7 and 3*5+8=23 are primes.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..3000
Crossrefs
Programs
-
Mathematica
Select[Prime[Range[7! ]],PrimeQ[3*#-8]&&PrimeQ[3*#+8]&] Select[Prime[Range[700]],AllTrue[3#+{8,-8},PrimeQ]&] (* Harvey P. Dale, Feb 10 2025 *)