%I #14 May 21 2023 11:03:34
%S 1,7,8,9,11,16,21,37,38,39,42,43,44,47,48,49,57,58,59,61,66,71,82,83,
%T 84,86,91,96,107,108,109,111,116,121,187,188,189,192,193,194,197,198,
%U 199,212,213,214,217,218,219,222,223,224,237,238
%N Numbers whose base-5 representation contains no 0's and exactly one 1.
%t Select[Range[300],DigitCount[#,5,0]==0&&DigitCount[#,5,1]==1&] (* _Harvey P. Dale_, Oct 24 2021 *)
%Y Cf. A007091.
%K nonn,base
%O 1,2
%A _Clark Kimberling_