OFFSET
2,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 2..10000
FORMULA
Equals EulerGamma^4 + EulerGamma^2*Pi^2 + 8*EulerGamma*Zeta(3) + 3*Pi^4/20.
Equals Integral_{x=0..oo} exp(-x)*log(x)^4 dx. - Amiram Eldar, Aug 06 2020
EXAMPLE
23.56147408402560449607312705652442040865376831336316996971897893425256...
MAPLE
c:= subs(x=1.0, diff(GAMMA(x), x$4)):
evalf(c, 120); # Alois P. Heinz, Jul 01 2023
MATHEMATICA
RealDigits[Gamma''''[1], 10, 111][[1]]
PROG
(PARI) default(realprecision, 100); Euler^4 + Euler^2*Pi^2 + 8*Euler*zeta(3) + 3*Pi^4/20 \\ G. C. Greubel, Sep 07 2018
(Magma) SetDefaultRealField(RealField(100)); R:= RealField(); L:=RiemannZeta(); EulerGamma(R)^4 + EulerGamma(R)^2*Pi(R)^2 + 8*EulerGamma(R)*Evaluate(L, 3) + 3*Pi(R)^4/20; // G. C. Greubel, Sep 07 2018
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Robert G. Wilson v, Aug 24 2017
STATUS
approved