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 A289267 #12 Aug 28 2021 05:52:20
%S A289267 1,9,4,6,3,0,6,0,4,2,7,2,8,3,5,6,5,4,2,6,0,9,2,7,1,1,0,6,8,7,7,9,5,0,
%T A289267 0,6,0,6,0,9,2,7,4,8,7,9,4,7,5,9,9,7,6,1,5,8,2,8,0,2,5,6,8,7,3,7,1,9,
%U A289267 6,4,8,7,5,1,9,7,5,1,8,7,5,7,4,8,5,6
%N A289267 Decimal expansion of the limiting ratio of consecutive terms of A289262.
%F A289267 Real root of the equation 2 - 2*x + x^2 - 2*x^3 + x^4 - 2*x^5 + x^6 = 0. - _Vaclav Kotesovec_, Aug 28 2021
%e A289267 1.94630604272835654260927110687795006060927487947599...
%t A289267 z = 2000; r = 11/7;
%t A289267 u = CoefficientList[Series[1/Sum[Floor[(k + 1)*r] (-x)^k, {k, 0, z}], {x, 0, z}], x]; (* A289262 *)
%t A289267 v = N[u[[z]]/u[[z - 1]], 200]
%t A289267 RealDigits[v, 10][[1]](* A289267 *)
%Y A289267 Cf. A078140 (includes guide to related constants), A289262.
%K A289267 nonn,cons,easy
%O A289267 1,2
%A A289267 _Clark Kimberling_, Jul 14 2017