A013021 Expansion of e.g.f. arctanh(sinh(x) + log(x+1)).

0, 2, -1, 19, -54, 1093, -7350, 163231, -1890840, 46856629, -793522800, 22080566781, -495344954280, 15484604767435, -431828053264608, 15117468706455571, -502151660656769760, 19584866374955872169

Offset

0,2

Links

Muniru A Asiru, Table of n, a(n) for n = 0..100

Example

2*x - 1/2!*x^2 + 19/3!*x^3 - 54/4!*x^4 ...

Maple

seq(coeff(series(factorial(n)*arctanh(sinh(x)+log(x+1)), x, n+1), x, n), n=0..20); # Muniru A Asiru, Jul 30 2018

Prog

(PARI) x = 'x + O('x^30); concat([0], Vec(serlaplace(atanh(sinh(x) + log(x+1))))) \\ Michel Marcus, Jul 30 2018

Crossrefs

Sequence in context: A367971 A013016 A012901 * A012907 A317996 A066753

Adjacent sequences: A013018 A013019 A013020 * A013022 A013023 A013024

Keyword

sign

Author

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

Extensions

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

Status

approved