A370873 Positive integers m such that c(0) >= c(1) >= c(2), where c(k) = number of k's in the ternary representation of m.
3, 9, 11, 15, 19, 21, 27, 28, 29, 30, 33, 36, 45, 55, 57, 63, 81, 82, 83, 84, 86, 87, 88, 90, 92, 96, 99, 100, 102, 108, 110, 114, 126, 135, 136, 138, 144, 163, 165, 166, 171, 172, 174, 189, 190, 192, 198, 243, 244, 245, 246, 247, 248, 249, 250, 252, 253
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] &]