A012503 arcsinh(cos(x)*arctan(x))=x-6/3!*x^3+108/5!*x^5-5880/7!*x^7...

1, -6, 108, -5880, 624848, -110121440, 29157594048, -10831610048896, 5375188617697536, -3434391975840699904, 2745651126153216330752, -2684651090523817558325248, 3151501790727433916335149056

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A011555 A122722 A127946 * A168482 A132856 A368851

Adjacent sequences: A012500 A012501 A012502 * A012504 A012505 A012506

Keyword

sign

Author

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

Status

approved