A139301 a(n) = (2^(2p - 1)/8)-1, where p is the n-th Mersenne prime A000668(n).
3, 1023, 288230376151711743, 1809251394333065553493296640760748560207343510400633813116524750123642650623
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
a[n_] := 2^(2^(MersennePrimeExponent[n] + 1) - 6) - 1; Array[a, 4] (* Amiram Eldar, Jul 10 2025 *)
Extensions
a(4) from Amiram Eldar, Jul 10 2025