%I
%S 0,1,2,3,5,6,7,9,10,11,12,13,14,16,17,18,20,21,22,23,24,25,27,28,29,
%T 31,32,33,34,35,36,38,39,40,42,43,52,55,56,57,58,60,61,62,64,65,66,67,
%U 68,69,71,72,73,75,76,77,78,79,80,82,83,84,86,87,92,99,100,101,102
%N Numbers whose base-11 representation has the same number of 4's and 8's.
%t Select[Range[0,150],DigitCount[#,11,4]==DigitCount[#,11,8]&] (* _Harvey P. Dale_, Jan 18 2013 *)
%K nonn,base,easy
%O 1,3
%A _Olivier Gérard_
|