A147709 Decimal expansion of sinh(EulerGamma).

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

Offset: 0

Author

Artur Jasinski, Nov 11 2008

Keywords

• cons
• nonn

Examples

			Equals 0.6098064672116564077061804441581493812019674136891385186017534...
		

Links

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

Crossrefs

Cf. A001620, A098907.

Cf. A147708 (with cosh), A147710 (with tanh), A147711 (with coth).

Programs

Magma

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

Mathematica

First[RealDigits[N[(Exp[EulerGamma] - Exp[ -EulerGamma])/2, 100]]]
RealDigits[Sinh[EulerGamma],10,120][[1]] (* Harvey P. Dale, Mar 06 2013 *)

PARI

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

Extensions

Leading zero removed, offset adjusted by R. J. Mathar, Feb 05 2009

Corrected by Harvey P. Dale, Mar 06 2013