A099983 Bisection of A000043.
3, 7, 17, 31, 89, 127, 607, 2203, 3217, 4423, 9941, 19937, 23209, 86243, 132049, 756839, 1257787, 2976221, 6972593, 20996011, 25964951, 32582657, 42643801, 57885161
Offset: 1
Programs
-
Mathematica
MersennePrimeExponent[Range[2, 48, 2]] (* Amiram Eldar, Oct 16 2024 *)
Formula
a(n) = A000043(2*n). - Amiram Eldar, Oct 16 2024
Extensions
Offset corrected and a(20)-a(24) added by Amiram Eldar, Oct 16 2024