This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A370861 #11 Mar 11 2024 07:20:01 %S A370861 1,4,5,7,10,12,13,14,16,22,31,32,34,37,38,39,40,41,42,43,44,46,48,49, %T A370861 50,52,58,64,66,67,68,70,76,85,91,93,94,95,97,98,103,104,106,109,111, %U A370861 112,113,115,116,117,118,119,120,121,122,123,124,125,127,128 %N A370861 Numbers m such that c(0) < c(1) >= c(2), where c(k) = number of k's in the ternary representation of m. %e A370861 The ternary representation of 16 is 121, for which c(0)=0 < c(1)=2 >= c(2)=1. %t A370861 Select[Range[1000], DigitCount[#, 3, 0] < DigitCount[#, 3, 1] >= DigitCount[#, 3, 2] &] %Y A370861 Cf. A007089, A077267, A062756, A081603. %Y A370861 Cf. A370853, A370859, A370860, A370862. %K A370861 nonn,base %O A370861 1,2 %A A370861 _Clark Kimberling_, Mar 03 2024