A293338 The integer k that minimizes |k/2^n - e|.

3, 5, 11, 22, 43, 87, 174, 348, 696, 1392, 2784, 5567, 11134, 22268, 44536, 89073, 178145, 356291, 712581, 1425163, 2850325, 5700650, 11401300, 22802601, 45605201, 91210403, 182420806, 364841611, 729683222, 1459366444, 2918732889, 5837465777, 11674931555

Offset

0,1

Links

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

Formula

a(n) = floor(1/2 + e*2^n).

a(n) = A027437(n) if (fractional part of e*2^n) < 1/2, else a(n) = A293337(n).

Mathematica

z = 120; r = E;
Table[Floor[r*2^n], {n, 0, z}];   (* A027437 *)
Table[Ceiling[r*2^n], {n, 0, z}]; (* A293337 *)
Table[Round[r*2^n], {n, 0, z}]; (* A293338 *)

Crossrefs

Cf. A001113, A027437, A293337, A293341.

Sequence in context: A352006 A004039 A341532 * A168655 A005830 A007008

Adjacent sequences: A293335 A293336 A293337 * A293339 A293340 A293341

Keyword

nonn,easy

Author

Clark Kimberling, Oct 10 2017

Status

approved