A012226 arcsinh(arctan(tanh(x)))=x-5/3!*x^3+129/5!*x^5-8189/7!*x^7...

1, -5, 129, -8189, 972609, -186825429, 53036534017, -20924521480269, 10970414196349569, -7386311927549483045, 6216439933812148586625, -6398271924540885631183389, 7909256594572491509610323905

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcSinh[ArcTan[Tanh[x]]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Aug 24 2019 *)

Crossrefs

Sequence in context: A012176 A012187 A012083 * A281818 A332317 A069078

Adjacent sequences: A012223 A012224 A012225 * A012227 A012228 A012229

Keyword

sign

Author

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

Status

approved