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 A373918 #6 Jun 28 2024 09:55:34
%S A373918 4,1,6,7,7,8,2,7,9,8,0,0,4,8,2,3,4,9,2,1,8,0,8,0,7,3,5,1,1,2,1,0,9,6,
%T A373918 7,4,5,7,0,1,9,5,8,9,6,1,1,0,1,7,4,9,9,3,9,8,4,1,2,3,7,5,6,0,3,4,2,7,
%U A373918 8,9,1,7,5,0,5,3,1,1,8,6,2,9,9,6,3,0,6,0,9,6,2,8
%N A373918 Decimal expansion of the location of the minimum of f(x)=x*cosh(1/(2*x)) for x>0.
%C A373918 This constant separates the parameter ranges of dimensionless tension in determining the shape of the sag curve of a heavy rope into slack solution and tensioned solution.
%e A373918 0.41677827980048234921808073511210967457019589611...
%t A373918 RealDigits[x /. FindRoot[Tanh[1/(2*x)] == 2*x, {x, 1/2}, WorkingPrecision -> 100]][[1]] (* _Vaclav Kotesovec_, Jun 28 2024 *)
%o A373918 (PARI) my(f(x)=x*cosh(1/(2*x))); solve(x=0.3,0.5,f'(x))
%Y A373918 The function value at the minimum is A240358/2 = 0.754439780769159964454942244...
%K A373918 nonn,cons
%O A373918 0,1
%A A373918 _Hugo Pfoertner_, Jun 27 2024