A200135 Decimal expansion of the negated value of the digamma function at 1/5.

5, 2, 8, 9, 0, 3, 9, 8, 9, 6, 5, 9, 2, 1, 8, 8, 2, 9, 5, 5, 4, 7, 2, 0, 7, 9, 6, 2, 4, 4, 9, 9, 5, 2, 1, 0, 4, 8, 2, 5, 5, 8, 8, 2, 7, 4, 2, 0, 6, 6, 4, 2, 8, 1, 0, 1, 7, 5, 8, 5, 8, 6, 6, 4, 1, 9, 1, 6, 2, 4, 7, 5, 4, 0, 9, 1, 6, 1, 9, 6, 5, 2, 5, 4, 6, 5, 7, 7, 8, 2, 4, 3, 1, 9, 5, 7, 0, 3, 6, 2, 4, 1, 2, 4, 0

Offset

1,1

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Wikipedia, Digamma function

Index entries for sequences related to the digamma function

Formula

Psi(1/5) = -gamma - Pi*sqrt(1 + 2/sqrt(5))/2 - 5*log(5)/4 -sqrt(5)*log((3 + sqrt(5))/2)/4 where gamma = A001620, sqrt(1 + 2/sqrt(5)) = A019952, (3 + sqrt(5))/2 = A104457.

Example

Psi(1/5) =  -5.289039896592188295547207962...

Maple

-gamma-Pi*sqrt(1+2/sqrt(5))/2-5*log(5)/4-sqrt(5)/4*log((3+sqrt(5)/2) ); evalf(%) ;

Mathematica

RealDigits[-PolyGamma[1/5], 10, 105] // First (* Jean-François Alcover, Feb 11 2013 *)

Prog

(PARI) -psi(1/5) \\ Charles R Greathouse IV, Jul 19 2013
(Magma) SetDefaultRealField(RealField(100)); R:= RealField(); -EulerGamma(R) -Pi(R)*Sqrt(1+2/Sqrt(5))/2 -5*Log(5)/4 -Sqrt(5)/4*Log((3+Sqrt(5)/2) ); // G. C. Greubel, Sep 03 2018

Crossrefs

Cf. A020759, A047787, A020777, A200064, A200134, A200136, A200137, A200138.

Sequence in context: A168202 A153455 A193019 * A001062 A187876 A179951

Adjacent sequences: A200132 A200133 A200134 * A200136 A200137 A200138

Keyword

cons,nonn

Author

R. J. Mathar, Nov 13 2011

Extensions

More terms from Jean-François Alcover, Feb 11 2013

Status

approved