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 A078335 #22 Jul 05 2024 10:37:57 %S A078335 5,2,9,0,3,1,6,0,9,3,1,1,9,7,7,0,7,1,0,7,2,2,2,2,5,8,1,8,6,3,1,1,7,2, %T A078335 7,4,7,9,9,9,8,2,0,1,8,8,3,0,7,5,4,4,2,9,2,3,9,4,6,5,3,2,5,9,5,6,1,5, %U A078335 5,5,0,8,9,8,7,3,3,6,1,7,9,8,1,2,3,2,3,1,6,6,7,7,0,4,2,6,6,2,0,1,0,7,9,9,6 %N A078335 Decimal expansion of largest real root of e^x = Gamma(x+1). %C A078335 This number corresponds to the point where the Gamma function starts to exceed the exponential function. %H A078335 Robert Munafo, <a href="http://www.mrob.com/pub/math/numbers-2.html">Notable Properties of Specific Numbers</a> %F A078335 Equals log(A330380). - _Hugo Pfoertner_, Jun 27 2024 %e A078335 x = 5.2903160931197707107222258186311727479998201883... %t A078335 digits = 105; x /. FindRoot[E^x == Gamma[x+1], {x, 5}, WorkingPrecision -> digits+5] // RealDigits[#, 10, digits]& // First (* _Jean-François Alcover_, Mar 05 2013 *) %o A078335 (PARI) solve(x=5.2,5.3,exp(x)-gamma(1+x)) %Y A078335 Cf. A330380. %K A078335 cons,nonn %O A078335 1,1 %A A078335 _Robert G. Wilson v_, Nov 21 2002 %E A078335 More terms from _Benoit Cloitre_, Nov 25 2002