A370863 Numbers m such that c(0) > c(1) < c(2), where c(k) = number of k's in the ternary representation of m.
6, 18, 20, 24, 54, 56, 60, 62, 72, 74, 78, 89, 101, 105, 137, 141, 153, 162, 164, 167, 168, 169, 170, 173, 177, 180, 181, 182, 183, 186, 188, 191, 195, 207, 216, 217, 218, 219, 222, 224, 225, 234, 236, 240, 251, 263, 267, 269, 299, 303, 305, 315, 317, 321
Offset: 1
Examples
The ternary representation of 20 is 202, for which c(0)=1 > c(1)=0 < c(2)=2.
Crossrefs
Programs
-
Mathematica
Select[Range[1000], DigitCount[#, 3, 0] > DigitCount[#, 3, 1] < DigitCount[#, 3, 2] &]