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 A076419 #13 Oct 17 2021 11:33:37 %S A076419 7,8,5,4,7,5,7,4,3,8,2,3,7,6,1,2,5,6,4,8,6,1,0,0,8,5,8,2,7,6,4,5,7,0, %T A076419 4,5,7,8,4,8,5,4,1,9,2,9,2,3,0,0,4,6,6,9,4,4,2,3,2,8,1,4,4,8,8,2,6,5, %U A076419 6,1,4,2,1,4,0,8,6,5,3,5,2,8,2,3,4,9,8,6,6,7,8,9,3,9,9,9,8,0,0,5,3,6,2,1,3 %N A076419 Decimal expansion of third solution of equation cos(x)*cosh(x) = -1. %C A076419 This is an equation related to a cantilever beam: cos(x)*cosh(x) = -1. The first three solutions are: 1.875 (A076417), 4.69409 (A076418) and 7.854757 (this sequence). %H A076419 Z. Guede, I. Elishakov, <a href="http://dx.doi.org/10.1016/S0960-0779(00)00014-X">A fifth-order polynomial that serves as both buckling and vibration mode of an inhomogeneous structure</a>, Chaos, Solitons and Fractals 12 (7) (2001) 1267-1298. %e A076419 cos(x) cosh(x) = -1, x = 7.854757... %t A076419 RealDigits[x/.FindRoot[Cos[x]Cosh[x]==-1,{x,8},WorkingPrecision-> 120]] [[1]] (* _Harvey P. Dale_, Oct 17 2021 *) %o A076419 (PARI) solve(x=7, 8, cos(x)*cosh(x) + 1) \\ _Michel Marcus_, Sep 11 2019 %Y A076419 Cf. A076417, A076418. %K A076419 easy,nonn,cons %O A076419 1,1 %A A076419 _Zak Seidov_, Oct 10 2002