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 A256684 #11 Feb 16 2025 08:33:25 %S A256684 6,6,7,8,4,1,8,2,1,3,0,7,3,4,2,6,7,4,2,8,2,9,8,5,5,8,8,8,6,0,2,2,0,0, %T A256684 0,9,9,2,0,4,6,8,6,0,1,0,1,5,0,7,6,0,1,4,3,3,9,7,5,0,1,3,1,9,8,3,4,9, %U A256684 5,6,1,8,2,2,9,0,5,8,7,2,6,6,6,2,0,1,5,6,2,2,6,5,8,8,9,7,4,8,1,6,0,6,7,3 %N A256684 Decimal expansion of the [negated] abscissa of the Gamma function local maximum in the interval [-7,-6]. %H A256684 Eric Weisstein's MathWorld, <a href="https://mathworld.wolfram.com/GammaFunction.html">Gamma Function</a> %H A256684 Wikipedia, <a href="http://en.wikipedia.org/wiki/Particular_values_of_the_Gamma_function">Particular values of the Gamma Function</a> %F A256684 Solution to PolyGamma(x) = 0 in the interval [-7,-6] %e A256684 Gamma(-6.6784182130734267428298558886022000992046860101507601433975...) %e A256684 = -0.0013973966089497673013074886687985785170487809897563228... %t A256684 digits = 104; x0 = x /. FindRoot[PolyGamma[0, x] == 0, {x, -13/2}, WorkingPrecision -> digits + 5]; RealDigits[x0, 10, digits] // First %Y A256684 Cf. A030169, A030171, A175472, A175473, A256681-A256683, A256685-A256687. %K A256684 nonn,cons %O A256684 1,1 %A A256684 _Jean-François Alcover_, Apr 08 2015