This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A037969 #13 Dec 20 2024 12:11:49
%S A037969 3,4,6,9,11,12,13,18,19,20,22,25,26,27,36,37,38,41,43,44,45,50,51,52,
%T A037969 53,54,73,74,75,76,77,82,83,84,86,89,90,91,100,101,102,105,106,107,
%U A037969 108,109,146,147,148,149,150,153,154,155,164,165
%N A037969 Numbers whose maximal base-2 run length is 2.
%F A037969 A037969 = { n | A043276(n)=2 }. - _M. F. Hasler_, Jul 23 2013
%t A037969 Select[Range[200],Max[Length/@Split[IntegerDigits[#,2]]]==2&] (* _Harvey P. Dale_, Dec 20 2024 *)
%o A037969 (PARI) for(i=1,199,A043276(i)==2&&print1(i",")) \\ _M. F. Hasler_, Jul 23 2013
%Y A037969 Cf. A000975 = { n | A043276(n)=1 }, A037970 ff.
%K A037969 nonn,base
%O A037969 1,1
%A A037969 _Clark Kimberling_