OFFSET
0,4
COMMENTS
Highest k with 3^(n+k) <= 4^n * 2^k.
FORMULA
MATHEMATICA
Table[Floor[n*Log[4/3]/Log[3/2]], {n, 0, 68}] (* James C. McMahon, Jan 27 2024 *)
PROG
(PARI) alist(N) = my(a=-1, b=1, k=0); vector(N, i, a+=2; b*=3; if(logint(b, 2) < a, a++; b*=3; k++); k); \\ note that i is n+1
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Ruud H.G. van Tol, Jan 25 2024
STATUS
editing