%I #11 Jun 20 2021 20:51:20
%S 0,2,3,4,6,7,13,16,18,19,20,22,23,24,26,27,28,30,31,32,34,35,36,38,39,
%T 41,48,50,51,52,54,55,56,58,59,60,62,63,69,85,93,101,104,106,107,108,
%U 110,111,117,125,128,130,131,132,134,135,141,144,146,147,148,150,151
%N Numbers whose base-8 representation has the same number of 1's and 5's.
%t Select[Range[0,200],DigitCount[#,8,1]==DigitCount[#,8,5]&] (* _Harvey P. Dale_, Dec 09 2012 *)
%K nonn,base,easy
%O 1,2
%A _Olivier GĂ©rard_
|