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 A030172 #17 Feb 16 2025 08:32:35 %S A030172 0,1,7,1,2,1,6,1,1,1,1,6,1,4,1,1,10,3,1,10,3,4,2,1,1,2,1,6,1,1,11,1,1, %T A030172 2,1,2,1,1,1,3,35,3,5,2025,1,1,2,6,3,4,16,1,1,2,2,3,1,2,1,1,3,1,8,4, %U A030172 13,1,8,10,3,14,1,2 %N A030172 Let c be the point at which Gamma(x), x>0, is minimized; sequence gives continued fraction for Gamma(c). %H A030172 G. C. Greubel, <a href="/A030172/b030172.txt">Table of n, a(n) for n = 0..5000</a> %H A030172 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/GammaFunction.html">Gamma Function.</a> %t A030172 ContinuedFraction[ Gamma[x] /. FindRoot[Gamma'[x] == 0, {x, 1}, WorkingPrecision -> 100], 72] (* _Jean-François Alcover_, Oct 29 2012 *) %o A030172 (PARI) contfrac(gamma(solve(x=1, 2, psi(x)))) \\ _G. C. Greubel_, Dec 28 2019 %Y A030172 Cf. A030171. %K A030172 nonn,cofr %O A030172 0,3 %A A030172 _Eric W. Weisstein_