login
A031451
Numbers whose base-2 representation has 4 fewer 0's than 1's.
0
15, 47, 55, 59, 61, 62, 159, 175, 183, 187, 189, 190, 207, 215, 219, 221, 222, 231, 235, 237, 238, 243, 245, 246, 249, 250, 252, 575, 607, 623, 631, 635, 637, 638, 671, 687, 695, 699, 701, 702, 719, 727, 731, 733, 734, 743, 747
OFFSET
1,1
MATHEMATICA
Select[Range[750], DigitCount[#, 2, 1]-DigitCount[#, 2, 0]==4&] (* Harvey P. Dale, Jan 28 2012 *)
CROSSREFS
Cf. A007088.
Sequence in context: A269013 A041438 A045111 * A105572 A143031 A214675
KEYWORD
nonn,base
STATUS
approved