A147711 Decimal expansion of coth(EulerGamma).

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

Offset: 1

Author

Artur Jasinski, Nov 11 2008

Keywords

• cons
• nonn

Examples

			1.920717496051102737973648663483211255479106194024976155441...
		

Links

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

Crossrefs

Cf. A001620, A098907.

Cf. A147708 (with cosh), A147709 (with sinh), A147710 (with tanh).

Programs

Magma

SetDefaultRealField(RealField(100)); R:= RealField(); (Exp(EulerGamma(R)) + Exp(-EulerGamma(R)))/(Exp(EulerGamma(R)) - Exp(-EulerGamma(R))); // G. C. Greubel, Aug 29 2018

Mathematica

First[RealDigits[N[(Exp[EulerGamma] + Exp[ -EulerGamma])/(Exp[EulerGamma] - Exp[ -EulerGamma]), 100]]]

PARI

default(realprecision, 100); (exp(Euler) + exp(-Euler))/(exp(Euler) - exp(-Euler)) \\ G. C. Greubel, Aug 29 2018

PARI

1/tanh(Euler) \\ Charles R Greathouse IV, May 14 2019