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 A076418 #14 Sep 11 2019 05:03:48 %S A076418 4,6,9,4,0,9,1,1,3,2,9,7,4,1,7,4,5,7,6,4,3,6,3,9,1,7,7,8,0,1,9,8,1,2, %T A076418 0,4,9,3,8,9,8,9,6,7,3,7,5,4,5,7,6,6,8,2,8,9,7,2,8,0,3,2,7,7,8,4,9,0, %U A076418 7,7,9,3,6,8,0,1,0,5,2,5,0,8,0,0,3,5,8,8,5,0,2,7,8,1,5,5,4,2,7,3,1,5,7,7,2 %N A076418 Decimal expansion of second solution of equation cos(x)*cosh(x) = -1. %C A076418 This is an equation related to a cantilever beam: cos(x)*cosh(x) = -1. The first three solutions are: 1.875 (A076417), 4.69409 (this sequence) and 7.854757 (A076419). %H A076418 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 A076418 4.694091132974174576436391778... %t A076418 RealDigits[x/.FindRoot[Cos[x]Cosh[x]==-1,{x,4},WorkingPrecision-> 120]] [[1]] (* _Harvey P. Dale_, May 01 2019 *) %o A076418 (PARI) solve(x=4, 5, cos(x)*cosh(x) + 1) \\ _Michel Marcus_, Sep 11 2019 %Y A076418 Cf. A076417, A076419. %K A076418 easy,nonn,cons %O A076418 1,1 %A A076418 _Zak Seidov_, Oct 10 2002