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 A030170 #18 Feb 16 2025 08:32:35 %S A030170 1,2,6,63,135,1,1,1,1,4,1,38,9,2,5,734,6,4,1,1,2,16,1,1,1,2,1,5,3,1,2, %T A030170 2478,1,1,1,3,8,1,1,7,1,1,1,64,29,3,10,2,5,1,1,2,61,1,39,1,5,1,1,2,1, %U A030170 8,1,16,12,3,1,32,1 %N A030170 Let c be the point at which Gamma(x), x>0, is minimized; sequence gives continued fraction for c. %H A030170 G. C. Greubel, <a href="/A030170/b030170.txt">Table of n, a(n) for n = 0..5000</a> %H A030170 R. Schroeppel, <a href="http://www.inwap.com/pdp10/hbaker/hakmem/cf.html#item98">HAKMEM 140 - Continued Fractions: ITEM 98 (Minimum of factorial function)</a>. M.I.T., Artificial Intelligence Memo No. 239, February 29, 1972. %H A030170 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/GammaFunction.html">Gamma Function.</a> %t A030170 ContinuedFraction[ x /. FindRoot[ Gamma'[x] == 0, {x, 1}, WorkingPrecision -> 100], 69] (* _Jean-François Alcover_, Oct 29 2012 *) %o A030170 (PARI) contfrac(solve(x=1, 2, psi(x))) \\ _Michel Marcus_, Oct 18 2017 %Y A030170 Cf. A030169. %K A030170 nonn,cofr %O A030170 0,2 %A A030170 _Eric W. Weisstein_