OFFSET
0,3
EXAMPLE
3^0 <= 2^0 < 3^1 < 2^2 < 3^2 < 2^4 < 3^3 < ...
MAPLE
[seq(op([3^i, 2^ceil(log[2](3^i))]), i=0..50)]; # Robert Israel, May 22 2024
MATHEMATICA
a[n_] := If[EvenQ[n], 3^(n/2), 2^Ceiling[((n - 1)/2) Log[3]/Log[2]]]
Table[a[n], {n, 0, 37}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, May 18 2024
STATUS
approved