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 A336086 #10 Mar 06 2021 02:22:42 %S A336086 3,6,7,7,8,5,9,6,3,2,5,7,8,6,8,3,7,9,1,2,2,5,0,9,2,4,5,1,1,4,6,0,2,9, %T A336086 9,6,6,9,5,3,3,1,5,8,2,0,5,9,2,7,2,4,0,3,6,7,7,2,7,5,4,1,0,2,9,5,0,8, %U A336086 9,2,2,2,9,7,0,6,4,1,7,3,2,8,3,3,6,0 %N A336086 Decimal expansion of the arclength on the unit circle such that the corresponding chord separates the interior into segments having 1/2 = ratio of segment areas; see Comments. %C A336086 Suppose that s in (0,Pi) is the length of an arc of the unit circle. The associated chord separates the interior into two segments. Let A1 be the area of the larger and A2 the area of the smaller. The term "ratio of segment areas" means A1/A2. See A336073 for a guide to related sequences. %e A336086 arclength = 3.6778596325786837912250924511460299669533... %t A336086 k = 1/2; s = s /. FindRoot[(2 Pi - s + Sin[s])/(s - Sin[s]) == k, {s, 2}, WorkingPrecision -> 200] %t A336086 RealDigits[s][[1]] %Y A336086 Cf. A336073. %K A336086 nonn,cons %O A336086 1,1 %A A336086 _Clark Kimberling_, Jul 11 2020