# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a334851 Showing 1-1 of 1 %I A334851 #7 Feb 06 2022 14:42:55 %S A334851 2,7,5,5,0,1,6,8,5,6,6,9,0,4,8,4,8,6,8,7,9,2,9,0,5,5,0,7,4,8,1,4,7,3, %T A334851 6,9,0,7,5,0,0,5,9,7,5,4,6,3,7,0,4,6,4,4,1,4,4,7,9,8,8,2,7,9,5,0,2,5, %U A334851 5,5,3,4,5,3,5,2,4,3,1,0,7,1,7,4,3,5 %N A334851 Decimal expansion of the number x such that 1 = Integral_{0..x} Log(gamma(t)) dt. %e A334851 x = 2.75501685669048486879290550748147369075005975463704644144... %t A334851 x /. FindRoot[x Log[Gamma[x]] - x LogGamma[x] + PolyGamma[-2, x] - 1, {x, 3}, WorkingPrecision -> 120] (* _Peter J. C. Moses_, Jun 27 2020 *) %Y A334851 Cf. A075700. %K A334851 nonn,cons %O A334851 1,1 %A A334851 _Clark Kimberling_, Jun 27 2020 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE