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 A225778 #16 Jun 02 2025 08:34:39 %S A225778 0,2,1,50,3,1,1,1,1,1,1,1,3,1,1,3,2,1,34,1,4,1,1,6,2,3,6,3,43,1,1,1,5, %T A225778 1,1,2,2,1,1,1,3,1,15,3,2,3,5,5,1,8,1,5,1,3,2,1,2,1,1,1,1,42,3,6,12,1, %U A225778 2,4,8,1,7,2,1,2,3,1,154,1,1,1,1,11,1,4,3,1,8,5,2,3,2 %N A225778 Continued fraction expansion of the smallest positive solution of Gamma(-x)=Gamma(-2x). %e A225778 0.335514419... = 0+1/(2+1/(1+...)) %t A225778 ContinuedFraction[FindRoot[Gamma[-x] - Gamma[-2x] == 0, {x, 0.3}, WorkingPrecision -> 100]] %o A225778 (PARI) contfrac(solve(x=.3,.4,gamma(-x)-gamma(-2*x))) \\ _Charles R Greathouse IV_, Jul 26 2013 %K A225778 nonn,cofr %O A225778 0,2 %A A225778 _Arran Fernandez_, Jul 26 2013