%I #10 Jul 05 2021 02:27:41
%S 2,5,7,14,16,20,22,24,35,41,43,47,49,51,59,61,65,67,69,73,75,98,104,
%T 106,116,122,124,128,130,132,140,142,146,148,150,154,156,170,176,178,
%U 182,184,186,194,196,200,202,204,208,210,218,220
%N Numbers whose base-3 representation has one fewer 0 than 2's.
%t Select[Range[250],DigitCount[#,3,0]==DigitCount[#,3,2]-1&] (* _Harvey P. Dale_, Jun 29 2017 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_