A370861 Numbers m such that c(0) < c(1) >= c(2), where c(k) = number of k's in the ternary representation of m.

1, 4, 5, 7, 10, 12, 13, 14, 16, 22, 31, 32, 34, 37, 38, 39, 40, 41, 42, 43, 44, 46, 48, 49, 50, 52, 58, 64, 66, 67, 68, 70, 76, 85, 91, 93, 94, 95, 97, 98, 103, 104, 106, 109, 111, 112, 113, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 127, 128

Offset: 1

Author

Clark Kimberling, Mar 03 2024

Keywords

• nonn
• base

Examples

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

Crossrefs

Cf. A007089, A077267, A062756, A081603.

Cf. A370853, A370859, A370860, A370862.

Programs

Mathematica

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