A012628 arcsinh(arcsinh(x)*arctan(x))=2/2!*x^2-12/4!*x^4+118/6!*x^6+168/8!*x^8...

2, -12, 118, 168, -72918, -19180260, 7673967390, -1668580628400, 206209417380690, 17149380702207300, -8171629445251404090, -13542042383228350058760, 18432243823017229137614970

Offset

0,1

Links

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

Mathematica

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

Crossrefs

Sequence in context: A227459 A372200 A290840 * A012623 A009742 A279201

Adjacent sequences: A012625 A012626 A012627 * A012629 A012630 A012631

Keyword

sign

Author

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

Status

approved