|
%I #13 Jun 20 2021 16:07:32
%S 0,1,2,3,4,6,8,9,10,11,12,14,16,17,18,19,20,22,24,25,26,27,28,30,32,
%T 33,34,35,36,38,47,48,49,50,51,52,54,61,64,65,66,67,68,70,72,73,74,75,
%U 76,78,80,81,82,83,84,86,88,89,90,91,92,94,96,97,98,99,100,102,111
%N Numbers whose base-8 representation has the same number of 5's and 7's.
%t Select[Range[0,120],DigitCount[#,8,5]==DigitCount[#,8,7]&] (* _Harvey P. Dale_, Jul 21 2011 *)
%K nonn,base,easy
%O 1,3
%A _Olivier Gérard_
|
