OFFSET
0,1
REFERENCES
S. R. Finch, Mathematical Constants, Cambridge, 2003, p. 424.
LINKS
Eric Weisstein's World of Mathematics, Ramanujan Continued Fractions
EXAMPLE
0.568300003...
MATHEMATICA
4*Integrate[(x*Sech[x])/E^(Sqrt[5]*x), {x, 0, Infinity}]
RealDigits[(PolyGamma[1, (1+Sqrt[5])/4]-PolyGamma[1, (3+Sqrt[5])/4])/2, 10, 100][[1]] (* Vaclav Kotesovec, Aug 16 2015 *)
PROG
(PARI)
polygamma(n, x) = if (n == 0, psi(x), (-1)^(n+1)*n!*zetahurwitz(n+1, x));
(polygamma(1, (1+sqrt(5))/4) - polygamma(1, (3+sqrt(5))/4))/2 \\ Gheorghe Coserea, Sep 30 2018
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Eric W. Weisstein, Jan 26 2004
STATUS
approved