login
A013161
Expansion of e.g.f. sinh(arctanh(x) + log(x+1)).
0
0, 2, -1, 12, -30, 270, -1215, 12600, -81900, 992250, -8434125, 117879300, -1237732650, 19666196550, -245827456875, 4382752374000, -63549909423000, 1257302087291250, -20745484440305625, 451231749105637500
OFFSET
0,2
EXAMPLE
2*x - 1/2!*x^2 + 12/3!*x^3 - 30/4!*x^4 + 270/5!*x^5 ...
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Sinh[ArcTanh[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Feb 01 2024 *)
CROSSREFS
Sequence in context: A054677 A290533 A012929 * A012926 A013157 A062742
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
a(0)=0 inserted and title improved by Sean A. Irvine, Jul 31 2018
STATUS
approved