login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A330380
Decimal expansion of the y-coordinate for the largest solution to e^x = Gamma(x+1).
1
1, 9, 8, 4, 0, 6, 1, 3, 0, 3, 1, 1, 2, 7, 6, 7, 7, 6, 9, 1, 1, 5, 0, 4, 2, 7, 2, 6, 0, 1, 9, 4, 7, 4, 8, 1, 5, 6, 2, 4, 2, 3, 0, 3, 8, 2, 9, 8, 2, 5, 2, 8, 7, 6, 3, 0, 6, 6, 9, 6, 4, 9, 9, 2, 2, 5, 5, 8, 3, 4, 1, 7, 4, 3, 3, 8, 8, 7, 6, 1, 2, 7, 3, 4, 9, 9, 1, 3, 6, 1, 2, 4, 8, 3, 3, 9, 3, 1, 1, 2, 8, 5, 1, 0, 4, 0, 4, 4, 9, 2, 4, 4, 7, 2, 3
OFFSET
3,2
COMMENTS
This number is the y-coordinate of the point at which the factorial function, Gamma(x+1), begins to exceed the exponential function.
FORMULA
Equals exp(A078335).
EXAMPLE
x = 5.29031609311977071072...
y = 198.40406130311276776911...
MATHEMATICA
RealDigits[x /. FindRoot[Gamma[Log[x] + 1] == x, {x, 200}, WorkingPrecision -> 120], 10, 115][[1]] (* Amiram Eldar, May 31 2021 *)
PROG
(PARI) \p200
exp(solve (x=5, 6, exp(x)-gamma(x+1))) \\ Hugo Pfoertner, Dec 12 2019
CROSSREFS
Cf. A078335.
Sequence in context: A155532 A086306 A094139 * A021508 A346931 A199862
KEYWORD
nonn,cons
AUTHOR
Eliora Ben-Gurion, Dec 12 2019
STATUS
approved