This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A372823 #19 Sep 01 2025 11:35:48
%S A372823 1,1,3,4,9,16,27,32,81,128,243,256,729,1024,2187,4096,6561,8192,19683,
%T A372823 32768,59049,65536,177147,262144,531441,1048576,1594323,2097152,
%U A372823 4782969,8388608,14348907,16777216,43046721,67108864,129140163,134217728,387420489
%N A372823 Sequence formed as follows: for each k >= 0, insert between 3^k and 3^(k+1) the least power of 2 that is in the interval [3^k, 3^(k+1)], and then arrange the resulting numbers in nondecreasing order.
%e A372823 3^0 <= 2^0 < 3^1 < 2^2 < 3^2 < 2^4 < 3^3 < ...
%p A372823 [seq(op([3^i, 2^ceil(log[2](3^i))]),i=0..50)]; # _Robert Israel_, May 22 2024
%t A372823 a[n_] := If[EvenQ[n], 3^(n/2), 2^Ceiling[((n - 1)/2) Log[3]/Log[2]]]
%t A372823 Table[a[n], {n, 0, 37}]
%Y A372823 Cf. A000079, A000244, A006899, A372824, A372825, A372826.
%K A372823 nonn,changed
%O A372823 0,3
%A A372823 _Clark Kimberling_, May 18 2024