login
A037971
Numbers whose maximal base-2 run length is 4.
3
15, 16, 30, 33, 47, 48, 60, 61, 66, 67, 79, 80, 94, 97, 111, 112, 120, 121, 122, 123, 132, 133, 134, 135, 143, 144, 158, 161, 175, 176, 188, 189, 194, 195, 207, 208, 222, 225, 239, 240, 241, 242, 243, 244, 245, 246, 247, 264, 265
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[300], Max[Length/@Split[IntegerDigits[#, 2]]]==4&] (* Harvey P. Dale, Apr 24 2019 *)
CROSSREFS
Cf. A043276.
Sequence in context: A046417 A193566 A079832 * A022105 A041456 A041458
KEYWORD
nonn,base
STATUS
approved