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 A244262 #7 Jun 24 2014 11:35:03 %S A244262 2,4,7,2,5,4,8,0,7,5,2,4,0,1,2,2,7,0,1,4,3,7,6,3,5,5,0,9,3,5,8,2,0,2, %T A244262 8,3,7,7,4,3,6,0,5,5,5,5,8,8,4,1,1,5,1,6,0,8,0,7,2,2,1,4,8,1,1,7,2,1, %U A244262 8,1,9,1,2,6,2,7,5,4,3,2,0,9,7,7,0,4,6,8,7,4,0,8,7,5,8,8,4,2,4,8,8 %N A244262 Decimal expansion of theta = 2.472548..., an auxiliary constant used to compute the best constant in Friedrichs' inequality in one dimension. %D A244262 Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, Section 3.6 Sobolev Isoperimetric Constants, p. 223. %H A244262 J. T. Marti, <a href="http://dx.doi.org/10.1137/0516010">The Least Constant in Friedrichs’ Inequality in One Dimension.</a> %F A244262 Theta is the unique solution of the equation cos(t) - t/(t^2 + 1)*sin(t) = -1, with 0 < t < Pi. %e A244262 2.4725480752401227014376355093582... %t A244262 theta = t /. FindRoot[Cos[t] - t/(t^2 + 1)*Sin[t] == -1, {t, 2}, WorkingPrecision -> 101]; RealDigits[theta] // First %Y A244262 Cf. A244263. %K A244262 nonn,cons,easy %O A244262 1,1 %A A244262 _Jean-François Alcover_, Jun 24 2014