A370871 Numbers m such that c(0) >= c(1) > c(2), where c(k) = number of k's in the ternary representation of m.
3, 9, 27, 28, 30, 36, 81, 82, 84, 86, 88, 90, 92, 96, 100, 102, 108, 110, 114, 126, 136, 138, 144, 166, 172, 174, 190, 192, 198, 243, 244, 246, 247, 248, 250, 252, 253, 254, 255, 258, 262, 264, 270, 271, 272, 273, 276, 279, 288, 298, 300, 306, 324, 325, 326
Offset: 1
Examples
The ternary representation of 84 is 10010, for which c(0)=3 >= c(1)=2 > c(2)=0.
Programs
-
Mathematica
Select[Range[1000], DigitCount[#, 3, 0] >= DigitCount[#, 3, 1] > DigitCount[#, 3, 2] &]