A012053 tan(sin(arctanh(x)))=x+3/3!*x^3+41/5!*x^5+1187/7!*x^7+54449/9!*x^9...

1, 3, 41, 1187, 54449, 3092867, 95391193, -48911197853, -28872742806559, -14158572958744829, -7331436852140378359, -4214348760692049240797, -2723345361371865447323759, -1980230597926036207884317053

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Tan[Sin[ArcTanh[x]]], {x, 0, nn}], x]Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Sep 25 2012 *)

Crossrefs

Sequence in context: A222524 A241704 A181675 * A012162 A012225 A012129

Adjacent sequences: A012050 A012051 A012052 * A012054 A012055 A012056

Keyword

sign

Author

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

Status

approved