# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a244347 Showing 1-1 of 1 %I A244347 #5 Jun 26 2014 12:54:41 %S A244347 0,0,1,9,9,7,7,4,6,9,3,4,0,5,3,8,8,6,2,6,2,0,1,9,7,1,1,6,7,4,8,4,8,5, %T A244347 9,7,2,0,9,9,9,7,5,6,0,6,2,4,4,9,3,6,9,1,6,9,6,6,7,8,5,9,5,1,7,6,7,2, %U A244347 8,3,9,9,5,5,4,4,1,3,2,5,2,6,4,6,2,7,2,0,2,1,9,1,6,1,6,1,2,7,4,8,2,9,8,8,5,9 %N A244347 Decimal expansion of 'mu', a Sobolev isoperimetric constant related to the "rod inequality", arising from the elasticity study of a rod that is clamped at both ends. %D A244347 Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, Section 3.6 Sobolev Isoperimetric Constants, p. 221. %F A244347 mu = 1/theta^4, where theta is A076414. %e A244347 0.001997746934053886262... %t A244347 digits = 104; theta = x /. FindRoot[Cos[x]*Cosh[x] == 1, {x, 5}, WorkingPrecision -> digits+10]; mu = 1/theta^4; Join[{0, 0}, RealDigits[mu, 10, digits] // First] %Y A244347 Cf. A076414 (theta). %K A244347 nonn,cons,easy %O A244347 0,4 %A A244347 _Jean-François Alcover_, Jun 26 2014 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE