|
%I #12 Jun 26 2021 01:54:41
%S 2,3,4,5,6,7,8,9,10,22,23,24,25,26,27,28,29,32,33,34,35,36,37,38,39,
%T 42,43,44,45,46,47,48,49,52,53,54,55,56,57,58,59,62,63,64,65,66,67,68,
%U 69,72,73,74,75,76,77,78,79,82,83,84,85,86,87,88,89,92,93,94,95,96
%N Numbers whose base-10 representation has the same number of 0's and 1's.
%t Select[Range[100], DigitCount[#, 10, 1] == DigitCount[#, 10, 0] &] (* _Harvey P. Dale_, Oct 26 2015 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
