OFFSET
1,1
EXAMPLE
The ternary representation of 7 is 21, for which c(0)=0 < c(1)=1 <= c(2)=1. So 7 is in the sequence.
MATHEMATICA
Select[Range[1000], DigitCount[#, 3, 0] < DigitCount[#, 3, 1] <= DigitCount[#, 3, 2] &]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Clark Kimberling, Mar 03 2024
STATUS
approved