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 A372826 #10 May 30 2024 22:25:34
%S A372826 0,1,1,3,2,4,3,6,4,7,5,9,6,11,7,12,8,14,9,15,10,17,11,19,12,20,13,22,
%T A372826 14,23,15,25,16,26,17,28,18,30,19,31,20,33,21,34,22,36,23,38,24,39,25,
%U A372826 41,26,42,27,44,28,45,29,47,30,49,31,50,32,52,33,53,34
%N A372826 Exponents of 3 and 2 in sequence A372824.
%F A372826 a(2n) = n, a(2n+1) = greatest k such that 2^k < 3^(n+1).
%t A372826 a[n_] := If[EvenQ[n], n/2, Floor[((n + 1)/2) Log[3]/Log[2]]]
%t A372826 Table[a[n], {n, 0, 120}]
%Y A372826 Cf. A372824, A372825.
%K A372826 nonn,easy
%O A372826 0,4
%A A372826 _Clark Kimberling_, May 18 2024