A370872 Positive integers m such that c(0) > c(1) >= c(2), where c(k) = number of k's in the ternary representation of m.
9, 27, 29, 33, 45, 55, 57, 63, 81, 82, 83, 84, 87, 90, 99, 108, 135, 163, 165, 171, 189, 243, 244, 245, 246, 248, 249, 250, 252, 254, 258, 261, 262, 264, 270, 272, 276, 288, 297, 298, 300, 306, 324, 326, 330, 342, 378, 405, 406, 408, 414, 432, 487, 489, 490
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] &]