A012590 Expansion of e.g.f. arcsinh(arcsinh(x) * exp(x)).

0, 1, 2, 1, -12, -67, -50, 2917, 31752, 49849, -3711302, -59694967, -115031620, 13336031733, 273381245254, 558981564013, -100703000514928, -2505740944272783, -5344180827839502, 1386297984879140881, 40546775857977524228, 85953748442906064173, -31561185255306611700930

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..300

Example

x + 2/2!*x^2 + 1/3!*x^3 - 12/4!*x^4 - 67/5!*x^5 ...

Mathematica

Range[0, 30]! CoefficientList[Series[ArcSinh[ArcSinh[x] Exp[x]], {x, 0, 30}], x] (* Vincenzo Librandi, Jul 20 2018 *)

Crossrefs

Sequence in context: A009831 A012931 A013159 * A012291 A012585 A053566

Adjacent sequences: A012587 A012588 A012589 * A012591 A012592 A012593

Keyword

sign

Author

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

Extensions

a(0) inserted and title improved by Sean A. Irvine, Jul 20 2018

Status

approved