%I #12 Sep 13 2023 07:26:40
%S 728,1457,1700,1943,2024,2105,2132,2159,2168,2177,2180,2183,2184,2185,
%T 2915,3644,3887,4130,4211,4292,4319,4346,4355,4364,4367,4370,4371,
%U 4372,4616,4859,4940,5021,5048,5075,5084,5093
%N Numbers with exactly 6 2's in their ternary expansion.
%H Seiichi Manyama, <a href="/A023704/b023704.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[ Range[ 5103 ], (Count[ IntegerDigits[ #, 3 ], 2 ]==6)& ]
%K nonn,base,easy
%O 1,1
%A _Olivier GĂ©rard_