A012056 sinh(sin(arctanh(x)))=x+2/3!*x^3+16/5!*x^5+216/7!*x^7-1280/9!*x^9...

1, 2, 16, 216, -1280, -1141504, -263392128, -64804059904, -18858549039104, -6592583427379200, -2757743938862710784, -1367930584522073079808, -796483574916192660455424, -539009967859883250211815424

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sinh[Sin[ArcTanh[x]]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Apr 29 2018 *)

Crossrefs

Sequence in context: A360939 A114531 A365585 * A062971 A267782 A012164

Adjacent sequences: A012053 A012054 A012055 * A012057 A012058 A012059

Keyword

sign

Author

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

Status

approved