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