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 A289032 #7 Aug 28 2021 04:49:41 %S A289032 1,7,5,4,8,1,7,3,5,1,4,0,9,7,3,1,1,2,8,7,9,3,3,0,6,6,5,3,8,1,7,6,7,8, %T A289032 7,7,8,8,2,2,0,4,3,2,2,8,4,1,4,1,6,9,5,7,6,0,4,0,7,1,2,8,4,1,4,2,2,0, %U A289032 8,9,3,1,8,2,2,1,5,0,9,4,7,7,3,1,5,8 %N A289032 Decimal expansion of the limiting ratio of consecutive terms of A288236. %e A289032 1.754817351409731128793306653817678778822... %t A289032 z = 2000; r = -4/5 + Sqrt[6]; %t A289032 u = CoefficientList[Series[1/Sum[Floor[(k + 1)*r] (-x)^k, {k, 0, z}], {x, 0, z}], x]; (* A288236 *) %t A289032 v = N[u[[z]]/u[[z - 1]], 200] %t A289032 RealDigits[v, 10][[1]](* A289032 *) %Y A289032 Cf. A288235, A289005, A078140 (includes guide to related constants). %K A289032 nonn,cons,easy %O A289032 1,2 %A A289032 _Clark Kimberling_, Jul 14 2017