A109799 Primes p such that 2^p - 1 is a Chen prime.
2, 3, 5, 7, 13, 17, 19, 31, 61, 127
Offset: 1
Examples
a(5)=13 because 2^13 - 1 = 8191 is prime and 2^13 + 1 = 3*2731 is semiprime.
Programs
-
Mathematica
Select[Prime[Range[40]],PrimeQ[2^#-1]&&PrimeOmega[2^#+1]<3&] (* James C. McMahon, Mar 30 2024 *)
Comments