A043580 Numbers whose base-2 representation has exactly 13 runs.

5461, 9557, 10581, 10837, 10901, 10917, 10921, 10923, 10925, 10933, 10965, 11093, 11605, 13653, 17749, 18773, 19029, 19093, 19109, 19113, 19115, 19117, 19125, 19157, 19285, 19797, 20821, 21077, 21141, 21157, 21161

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Programs

Mathematica

Select[Range[22000],Length[Split[IntegerDigits[#,2]]]==13&] (* Harvey P. Dale, May 04 2019 *)