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,1

Links

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

Example

Equals 0.6098064672116564077061804441581493812019674136891385186017534...

Mathematica

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

Prog

(PARI) default(realprecision, 100); (exp(Euler) - exp(-Euler))/2 \\ G. C. Greubel, Aug 29 2018
(Magma) SetDefaultRealField(RealField(100)); R:= RealField(); (Exp(EulerGamma(R)) - Exp(-EulerGamma(R)))/2; // G. C. Greubel, Aug 29 2018

Crossrefs

Cf. A001620, A098907.

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

Sequence in context: A248725 A118178 A021168 * A176403 A153314 A019622

Adjacent sequences: A147706 A147707 A147708 * A147710 A147711 A147712

Keyword

cons,nonn

Author

Artur Jasinski, Nov 11 2008

Extensions

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

Corrected by Harvey P. Dale, Mar 06 2013

Status

approved