OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..10000
D. H. Lehmer, Euler constants for arithmetic progressions, Acta Arith. 27 (1975), p. 134.
FORMULA
Equals EulerGamma/8 + 1/8*(Pi/2*(sqrt(2)-1) + log(2) - sqrt(2)*log(sqrt(2)+1)).
EXAMPLE
0.08431968843316295593904035680375480012812437382591706852303...
MATHEMATICA
Join[{0}, RealDigits[-3/8*Log[2] - PolyGamma[3/8]/8, 10, 104] // First]
PROG
(PARI) default(realprecision, 100); Euler/8 + 1/8*(Pi/2*(sqrt(2)-1) + log(2) - sqrt(2)*log(sqrt(2)+1)) \\ G. C. Greubel, Aug 28 2018
(Magma) SetDefaultRealField(RealField(100)); R:= RealField(); EulerGamma(R)/8 + (1/8)*(Pi(R)/2*(Sqrt(2)-1) + Log(2) - Sqrt(2)*Log(Sqrt(2)+1)); // G. C. Greubel, Aug 28 2018
CROSSREFS
KEYWORD
AUTHOR
Jean-François Alcover, Apr 10 2015
STATUS
approved