A370865 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, 29, 33, 45, 54, 55, 56, 57, 60, 62, 63, 72, 74, 78, 83, 87, 89, 99, 101, 105, 135, 137, 141, 153, 162, 163, 164, 165, 167, 168, 169, 170, 171, 173, 177, 180, 181, 182, 183, 186, 188, 189, 191, 195, 207, 216, 217, 218, 219, 222, 224, 225, 234

Offset: 1

Author

Clark Kimberling, Mar 11 2024

Keywords

• nonn
• base

Examples

			The ternary representation of 20 is 202, for which c(0)=1 > c(1)=0 <= c(2)=2.
		

Crossrefs

Cf. A007089, A370853, A370859, A370863, A370864, A370866.

Programs

Mathematica

Select[Range[1000], DigitCount[#, 3, 0] > DigitCount[#, 3, 1] <= DigitCount[#, 3, 2] &]