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

9, 27, 29, 33, 45, 55, 57, 63, 81, 82, 83, 84, 87, 90, 99, 108, 135, 163, 165, 171, 189, 243, 244, 245, 246, 248, 249, 250, 252, 254, 258, 261, 262, 264, 270, 272, 276, 288, 297, 298, 300, 306, 324, 326, 330, 342, 378, 405, 406, 408, 414, 432, 487, 489, 490

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, A370871, A370873.

Sequence in context: A122985 A255622 A209511 * A115148 A022701 A276003

Adjacent sequences: A370869 A370870 A370871 * A370873 A370874 A370875

Keyword

nonn,base

Author

Clark Kimberling, Mar 13 2024

Status

approved