A293363 Least integer k such that k/2^n > log 2.

1, 2, 3, 6, 12, 23, 45, 89, 178, 355, 710, 1420, 2840, 5679, 11357, 22714, 45427, 90853, 181705, 363409, 726818, 1453635, 2907270, 5814540, 11629080, 23258160, 46516320, 93032640, 186065280, 372130559, 744261118, 1488522236, 2977044472, 5954088944

Offset

0,2

Links

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

Formula

a(n) = ceiling(r*2^n), where r = log 2.

a(n) = A293362(n) + 1. [corrected by Georg Fischer, Apr 16 2024]

Mathematica

z = 120; r = Log[2];
Table[Floor[r*2^n], {n, 0, z}];   (* A293362 *)
Table[Ceiling[r*2^n], {n, 0, z}]; (* A293363 *)
Table[Round[r*2^n], {n, 0, z}];   (* A293364 *)

Crossrefs

Cf. A002162, A293362, A293364.

Sequence in context: A154324 A338218 A001630 * A326021 A164363 A306809

Adjacent sequences: A293360 A293361 A293362 * A293364 A293365 A293366

Keyword

nonn,easy,changed

Author

Clark Kimberling, Oct 11 2017

Status

approved