|
%I #13 Apr 13 2021 23:15:05
%S 15,16,30,33,47,48,60,61,66,67,79,80,94,97,111,112,120,121,122,123,
%T 132,133,134,135,143,144,158,161,175,176,188,189,194,195,207,208,222,
%U 225,239,240,241,242,243,244,245,246,247,264,265
%N Numbers whose maximal base-2 run length is 4.
%H Harvey P. Dale, <a href="/A037971/b037971.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[300],Max[Length/@Split[IntegerDigits[#,2]]]==4&] (* _Harvey P. Dale_, Apr 24 2019 *)
%Y Cf. A043276.
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
