%I #9 Jul 04 2021 14:14:06

%S 80,161,215,233,239,241,404,458,476,482,484,566,620,638,644,646,674,

%T 692,698,700,710,716,718,722,724,726,971,1133,1187,1205,1211,1213,

%U 1295,1349,1367,1373,1375,1403,1421,1427,1429,1439,1445,1447

%N Numbers whose base-3 representation has 4 fewer 0's than 2's.

%t Select[Range[1500],DigitCount[#,3,2]==DigitCount[#,3,0]+4&] (* _Harvey P. Dale_, Aug 19 2014 *)

%Y Cf. A007089.

%K nonn,base

%O 1,1

%A _Clark Kimberling_