login
Product of first n Mersenne primes = Product_{k=1..n} A000668(k).
3

%I #15 Dec 28 2019 14:21:14

%S 3,21,651,82677,677207307,88762238935797,46536887964932201739,

%T 99937205886963012698207462133,

%U 230439507554803283449625488965353401397883657483,142635146517648430682283003170196535604142636808535322508273273161458426613

%N Product of first n Mersenne primes = Product_{k=1..n} A000668(k).

%H Harvey P. Dale, <a href="/A098918/b098918.txt">Table of n, a(n) for n = 1..15</a>

%e a(4) = 82677 because the first 4 Mersenne primes are 2^2-1=3, 2^3-1=7, 2^5-1=31, 2^7-1=127; 3*7*31*127 = 82677.

%t FoldList[Times,1,Select[Table[2^n-1,{n,Prime[Range[50]]}],PrimeQ]] (* _Harvey P. Dale_, Jul 10 2013 *)

%Y Cf. A000043, A000668.

%K nonn

%O 1,1

%A _Pierre CAMI_, Oct 17 2004

%E More terms from _Harvey P. Dale_, Jul 10 2013