A294154 Base-2 logarithm of product of primes between 2^n+1 and 2^(n+1).
1, 1, 5, 7, 22, 39, 84, 173, 367, 716, 1444, 2945, 5823, 11817, 23457, 47117, 94496, 188670, 378296, 755437, 1512435, 3024742, 6049260, 12099777, 24205776, 48402649, 96809896, 193632363, 387252738, 774544273, 1549044943
Offset: 0
Crossrefs
Programs
-
Mathematica
Table[Floor[ Log[2, Times @@ Table[Prime[i], {i, PrimePi[2^(n)] + 1, PrimePi[2^(n + 1)]}]]], {n, 0, 20}]
Extensions
a(26)-a(30) from Robert Price, Nov 30 2017
Comments