|
|
A293325
|
|
Least integer k such that k/2^n > sqrt(3).
|
|
2
|
|
|
2, 4, 7, 14, 28, 56, 111, 222, 444, 887, 1774, 3548, 7095, 14189, 28378, 56756, 113512, 227024, 454047, 908094, 1816187, 3632374, 7264748, 14529496, 29058991, 58117982, 116235963, 232471925, 464943849, 929887697, 1859775394, 3719550787, 7439101574
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
a(n) = ceiling(r*2^n), where r = sqrt(3).
|
|
MATHEMATICA
|
z = 120; r = Sqrt[3];
Table[Floor[r*2^n], {n, 0, z}]; (* A094386 *)
Table[Ceiling[r*2^n], {n, 0, z}]; (* A293325 *)
Table[Round[r*2^n], {n, 0, z}]; (* A293326 *)
|
|
PROG
|
(Python)
from math import isqrt
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|