%I #10 Sep 15 2022 12:44:17
%S 21,37,41,43,45,53,69,73,75,77,81,83,87,89,91,93,101,105,107,109,117,
%T 133,137,139,141,145,147,151,153,155,157,161,163,167,175,177,179,183,
%U 185,187,189,197,201,203,205,209,211,215,217
%N Numbers whose base-2 representation has exactly 5 runs.
%t Select[Range[300],Length[Split[IntegerDigits[#,2]]]==5&] (* _Harvey P. Dale_, Sep 15 2022 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_