A139295 a(n) = 2^(2p - 1)-1, where p is the n-th Mersenne prime A000668(n).
31, 8191, 2305843009213693951, 14474011154664524427946373126085988481658748083205070504932198000989141204991
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
a[n_] := 2^(2^(MersennePrimeExponent[n] + 1) - 3) - 1; Array[a, 4] (* Amiram Eldar, Jul 10 2025 *)