%I #15 May 16 2023 22:06:06
%S 3,8,15,16,19,23,28,33,40,41,44,48,75,76,79,80,81,84,95,96,99,103,108,
%T 115,116,119,123,128,133,140,141,144,148,153,158,165,166,169,173,200,
%U 201,204,205,206,209,220,221,224,228,233,240
%N Numbers whose base-5 representation contains no 2's and exactly one 3.
%t Select[Range[250],DigitCount[#,5,2]==0&&DigitCount[#,5,3]==1&] (* _Harvey P. Dale_, Apr 05 2011 *)
%Y Cf. A007091.
%K nonn,base
%O 1,1
%A _Clark Kimberling_