A309607 Exponents k for which reversal(2^k-1) is prime.
2, 3, 5, 53, 189, 293, 1107, 2181, 2695, 2871, 7667, 19999, 27471, 44537, 62323, 134367, 174295
Offset: 1
Examples
5 is included because for n=5, reversal(2^5-1)=13 is prime.
Links
- Carlos Rivera, Puzzle 417.
- Chris K. Caldwell and G. L. Honaker, Prime Curio for 1990474529917009.
Programs
-
Mathematica
Select[Range[7667], PrimeQ[IntegerReverse[2^# - 1]] &]
-
PARI
isok(k) = isprime(fromdigits(Vecrev(digits(2^k-1)))); \\ Michel Marcus, Aug 10 2019
Comments