%I #10 Jul 25 2023 22:27:17
%S 8,17,23,25,44,50,52,68,70,76,125,131,133,149,151,157,203,205,211,229,
%T 368,374,376,392,394,400,446,448,454,472,608,610,616,634,688,1097,
%U 1103,1105,1121,1123,1129,1175,1177,1183,1201,1337
%N Numbers whose base-3 representation contains no 0's and exactly two 2's.
%t Select[Range[1500],DigitCount[#,3,0]==0&&DigitCount[#,3,2]==2&] (* _Harvey P. Dale_, Dec 12 2019 *)
%Y Cf. A007089.
%K nonn,base
%O 1,1
%A _Clark Kimberling_