|
%I #10 Jul 25 2023 22:27:46
%S 9,28,30,36,85,91,93,109,111,117,256,274,280,282,328,334,336,352,354,
%T 360,769,823,841,847,849,985,1003,1009,1011,1057,1063,1065,1081,1083,
%U 1089,2308,2470,2524,2542,2548,2550,2956,3010
%N Numbers whose base-3 representation contains exactly two 0's and no 2's.
%t Select[Range[4000],DigitCount[#,3,0]==2&&DigitCount[#,3,2]==0&] (* _Harvey P. Dale_, Dec 16 2013 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
