%I #15 Jun 26 2021 06:45:02
%S 2,3,4,10,11,14,15,18,19,24,28,33,36,42,43,46,47,49,52,58,59,62,63,65,
%T 68,74,75,78,79,80,98,99,104,108,114,115,120,124,134,135,137,141,146,
%U 147,152,156,161,164,170,171,174,175,177,180,186,187,190,191,198,199
%N Numbers whose base-4 representation has the same number of 0's and 1's.
%H Ivan Neretin, <a href="/A039002/b039002.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[200], DigitCount[#, 4, 0] == DigitCount[#, 4, 1] &] (* _Ivan Neretin_, Apr 27 2017 *)
%Y Cf. A007090.
%K nonn,base,easy
%O 1,1
%A _Olivier GĂ©rard_
|