cp's OEIS Frontend

A293328 Least integer k such that k/2^n > sqrt(1/3).

%I A293328 #4 Oct 10 2017 10:32:00
%S A293328 1,2,3,5,10,19,37,74,148,296,592,1183,2365,4730,9460,18919,37838,
%T A293328 75675,151349,302698,605396,1210792,2421583,4843166,9686331,19372661,
%U A293328 38745321,77490642,154981283,309962566,619925132,1239850263,2479700525,4959401050,9918802099
%N A293328 Least integer k such that k/2^n > sqrt(1/3).
%H A293328 Clark Kimberling, <a href="/A293328/b293328.txt">Table of n, a(n) for n = 0..1000</a>
%F A293328 a(n) = ceiling(r*2^n), where r = sqrt(1/3).
%F A293328 a(n) = A293327(n) + 1.
%t A293328 z = 120; r = Sqrt[1/3];
%t A293328 Table[Floor[r*2^n], {n, 0, z}];   (* A293327 *)
%t A293328 Table[Ceiling[r*2^n], {n, 0, z}]; (* A293328 *)
%t A293328 Table[Round[r*2^n], {n, 0, z}];   (* A293329 *)
%Y A293328 Cf. A002194, A094386, A293327, A293329.
%K A293328 nonn,easy
%O A293328 0,2
%A A293328 _Clark Kimberling_, Oct 10 2017