%I #8 Mar 12 2024 22:33:44
%S 9,27,81,82,84,90,108,243,244,246,248,250,252,254,258,262,264,270,272,
%T 276,288,298,300,306,324,326,330,342,378,406,408,414,432,490,496,498,
%U 514,516,522,568,570,576,594,729,730,732,733,734,736,738,739,740,741
%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 84 is 10010, for which c(0)=3 > c(1)=2 > c(2)=0.
%t Select[Range[1000], DigitCount[#, 3, 0] > DigitCount[#, 3, 1] > DigitCount[#, 3, 2] &]
%Y Cf. A007089, A077267, A062756, A081603.
%Y Cf. A370853, A370859, A370863, A370864, A370871, A370872, A370873.
%K nonn,base
%O 1,1
%A _Clark Kimberling_, Mar 11 2024