A013489 exp(sinh(x)-arcsinh(x))=1+2/3!*x^3-8/5!*x^5+40/6!*x^6+226/7!*x^7...

1, 0, 0, 2, 0, -8, 40, 226, -896, -8784, 62304, 745186, -6036096, -87930776, 878453888, 14731669954, -172356091904, -3284180017312, 44229410876928, 942576417055042, -14356887611836416, -338316707471357480

Offset

0,4

Links

Table of n, a(n) for n=0..21.

Formula

E.g.f.: exp(sinh(x))/(x+sqrt(1+x^2)). - Vaclav Kotesovec, Nov 01 2013

a(n) ~ -2*cos(Pi*n/2-sin(1)) * n^(n-1) / exp(n). - Vaclav Kotesovec, Nov 01 2013

Mathematica

CoefficientList[Series[Exp[Sinh[x]-ArcSinh[x]], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Nov 01 2013 *)

Crossrefs

Sequence in context: A002909 A118437 A134185 * A013342 A109589 A326425

Adjacent sequences: A013486 A013487 A013488 * A013490 A013491 A013492

Keyword

sign

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Status

approved