%I #10 Jul 26 2023 03:20:51
%S 3,11,15,19,21,35,47,51,59,61,65,69,73,75,107,143,155,159,179,185,187,
%T 197,209,213,221,223,227,231,235,237,323,431,467,479,483,539,557,563,
%U 565,593,629,641,645,665,671,673,683,695,699
%N Numbers whose base-3 representation contains exactly one 0 and one 1.
%t Select[Range[1000],DigitCount[#,3,0]==DigitCount[#,3,1]==1&] (* _Harvey P. Dale_, Aug 06 2017 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_