%I #10 Mar 09 2024 11:22:05
%S 2,8,17,23,25,26,35,47,51,53,59,61,65,69,71,73,75,77,79,80,107,134,
%T 143,152,155,158,159,160,161,179,185,187,197,206,209,212,213,214,215,
%U 221,223,227,230,231,232,233,235,237,238,239,241,242
%N Numbers m such that c(0) <= c(1) < c(2), where c(k) = number of k's in the ternary representation of m.
%e The ternary representation of 8 is 22, for which c(0)=0 <= c(1)=0 < c(2)=2. So 8 is in the sequence.
%t Select[Range[1000], DigitCount[#, 3, 0] <= DigitCount[#, 3, 1] < DigitCount[#, 3, 2] &]
%Y Cf. A007089, A370853, A370855, A370856.
%K nonn,base
%O 1,1
%A _Clark Kimberling_, Mar 03 2024