[go: nahoru, domu]

login
A147709
Decimal expansion of sinh(EulerGamma).
5
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
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. A147708 (with cosh), A147710 (with tanh), A147711 (with coth).
Sequence in context: A248725 A118178 A021168 * A176403 A153314 A019622
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