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,1

Links

Table of n, a(n) for n=1..56.

Example

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

Mathematica

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

Crossrefs

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

Sequence in context: A074791 A093106 A234752 * A370863 A114452 A376881

Adjacent sequences: A370862 A370863 A370864 * A370866 A370867 A370868

Keyword

nonn,base

Author

Clark Kimberling, Mar 11 2024

Status

approved