A012057 arcsinh(sin(arctanh(x)))=x+4/5!*x^5-80/7!*x^7-3440/9!*x^9-764800/11!*x^11...

1, 0, 4, -80, -3440, -764800, -107953600, -25833184000, -6745073504000, -2368021859840000, -968030415297920000, -487629248007416320000, -285882353240737277440000, -197729299896592542208000000

Offset

0,3

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..200

Mathematica

nn = 20; Table[(CoefficientList[Series[ArcSinh[Sin[ArcTanh[x]]], {x, 0, 2*nn+1}], x] * Range[0, 2*nn+1]!)[[n]], {n, 2, 2*nn, 2}] (* Vaclav Kotesovec, Feb 03 2015 *)

Crossrefs

Sequence in context: A187543 A268734 A012824 * A214298 A102063 A002436

Adjacent sequences: A012054 A012055 A012056 * A012058 A012059 A012060

Keyword

sign

Author

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

Status

approved