login
A013493
exp(arcsinh(x)-tanh(x))=1+1/3!*x^3-7/5!*x^5+10/6!*x^6+47/7!*x^7...
0
1, 0, 0, 1, 0, -7, 10, 47, -392, 3369, 11814, -571573, 434412, 88260053, -239703334, -16363524721, 66778596688, 3810346797553, -19103113532274, -1115878992933037, 6219304575954900, 405808123338059597
OFFSET
0,6
MATHEMATICA
CoefficientList[Series[E^(ArcSinh[x] - Tanh[x]), {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Feb 04 2015 *)
CROSSREFS
Sequence in context: A056521 A056510 A013398 * A166661 A025632 A038276
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved