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 A066718 #6 Feb 16 2025 08:32:45
%S A066718 0,1,6,298,4534532,4682854730443938,
%T A066718 21178658483534445867705807931242133,
%U A066718 1784182521628823878390282782427911592097785568614928986384139293902055110
%N A066718 Incrementally largest terms in the continued fraction for the "binary" Champernowne constant.
%H A066718 Eric E. Weisstein, <a href="https://mathworld.wolfram.com/ChampernowneConstant.html">Champernowne Constant</a>
%t A066718 a = {}; Do[a = Append[a, IntegerDigits[n, 2]], {n, 1, 10^4} ]; b = ContinuedFraction[ N[ FromDigits[ {Flatten[a], 0}, 2], 7500]]; c = -1; d = {}; Do[If[b[[n]] > c, c = b[[n]]; d = Append[d, c]], {n, 1, 4400}]; d
%Y A066718 Cf. A066717.
%K A066718 base,nonn
%O A066718 1,3
%A A066718 _Robert G. Wilson v_, Jan 14 2002