|
%I #12 Aug 29 2021 11:53:20
%S 0,1,2,3,6,7,8,9,10,11,12,13,16,17,18,19,20,21,22,23,26,27,28,29,30,
%T 31,32,33,36,37,38,39,45,54,60,61,62,63,66,67,68,69,70,71,72,73,76,77,
%U 78,79,80,81,82,83,86,87,88,89,90,91,92,93,96,97,98,99,100,101,102
%N Numbers whose base-10 representation has the same number of 4's and 5's.
%t Select[Range[0,120],DigitCount[#,10,4]==DigitCount[#,10,5]&] (* _Harvey P. Dale_, Aug 29 2021 *)
%K nonn,base,easy
%O 1,3
%A _Olivier Gérard_
|
