A293359 Greatest integer k such that k/2^n < e^2.

7, 14, 29, 59, 118, 236, 472, 945, 1891, 3783, 7566, 15132, 30265, 60531, 121062, 242124, 484249, 968498, 1936996, 3873993, 7747986, 15495973, 30991947, 61983895, 123967790, 247935580, 495871160, 991742321, 1983484643, 3966969286, 7933938573, 15867877146

Offset: 0

Author

Clark Kimberling, Oct 10 2017

Keywords

• nonn
• easy

Links

• Clark Kimberling, Table of n, a(n) for n = 0..1000

Crossrefs

Cf. A072334, A293360, A293361.

Programs

Mathematica

z = 120; r = E^2;
Table[Floor[r*2^n], {n, 0, z}];   (* A293359 *)
Table[Ceiling[r*2^n], {n, 0, z}]; (* A293360 *)
Table[Round[r*2^n], {n, 0, z}];   (* A293361 *)

Formula

a(n) = floor(r*2^n), where r = e^2.

a(n) = A293360(n) - 1.