A139302 a(n) = 2^(2p - 1)/16, where p is the n-th Mersenne prime A000668(n).
2, 512, 144115188075855872, 904625697166532776746648320380374280103671755200316906558262375061821325312
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
a[n_] := 2^(2^(MersennePrimeExponent[n] + 1) - 7); Array[a, 4] (* Amiram Eldar, Jul 10 2025 *)
Extensions
a(4) from Amiram Eldar, Jul 10 2025