%I #14 Mar 03 2024 19:50:46
%S 4,14,19,20,22,23,54,64,69,70,72,73,79,89,94,95,97,98,100,102,103,110,
%T 112,113,115,117,118,254,264,269,270,272,273,304,314,319,320,322,323,
%U 329,339,344,345,347,348,350,352,353,360,362
%N Numbers whose base-5 representation contains no 1's and exactly one 4.
%t Select[Range[400],DigitCount[#,5,1]==0&&DigitCount[#,5,4]==1&] (* _Harvey P. Dale_, Mar 03 2024 *)
%Y Cf. A007091.
%K nonn,base
%O 1,1
%A _Clark Kimberling_