A237499 Odious Mersenne exponents.

2, 7, 13, 19, 31, 61, 107, 127, 521, 607, 1279, 3217, 11213, 21701, 44497, 132049, 216091, 756839, 1257787, 3021377, 6972593, 20996011, 24036583, 30402457, 37156667, 43112609, 82589933

Offset: 1

Author

Ilya Lopatin and Juri-Stepan Gerasimov, Feb 08 2014

Keywords

• nonn
• base
• more

Crossrefs

Intersection of A000043 and A027697.

Cf. A000069, A174265.

Programs

Mathematica

Select[MersennePrimeExponent[Range[47]], OddQ @ DigitCount[#, 2][[1]] &] (* Amiram Eldar, Dec 10 2019 *)

Extensions

a(13) and a(18) inserted and more terms added by Amiram Eldar, Dec 10 2019

a(27) added by Harvey P. Dale, Feb 01 2025