A074626 Prime following the n-th Mersenne prime.
5, 11, 37, 131, 8209, 131101, 524309, 2147483659, 2305843009213693967, 618970019642690137449562141, 162259276829213363391578010288167, 170141183460469231731687303715884105757
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..18
Programs
-
Maple
a:= n-> nextprime(numtheory[mersenne]([n])): seq(a(n), n=1..12); # Alois P. Heinz, Oct 30 2024
-
Mathematica
Table[NextPrime[2^MersennePrimeExponent[n] - 1], {n, 1, 12}] (* Amiram Eldar, Aug 10 2024 *)