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