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

3, 9, 27, 28, 30, 36, 81, 82, 84, 86, 88, 90, 92, 96, 100, 102, 108, 110, 114, 126, 136, 138, 144, 166, 172, 174, 190, 192, 198, 243, 244, 246, 247, 248, 250, 252, 253, 254, 255, 258, 262, 264, 270, 271, 272, 273, 276, 279, 288, 298, 300, 306, 324, 325, 326

Offset

1,1

Links

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

Example

The ternary representation of 84 is 10010, for which c(0)=3 >= c(1)=2 > c(2)=0.

Mathematica

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

Crossrefs

Cf. A007089, A077267, A062756, A081603.

Cf. A370870, A370872, A370873.

Sequence in context: A070344 A070357 A131137 * A061948 A018644 A349929

Adjacent sequences: A370868 A370869 A370870 * A370872 A370873 A370874

Keyword

nonn,base

Author

Clark Kimberling, Mar 11 2024

Status

approved