A013108 cos(arcsinh(x)+arctan(x))=1-4/2!*x^2+40/4!*x^4-1030/6!*x^6+51160/8!*x^8...

1, -4, 40, -1030, 51160, -4176250, 507867100, -86130937750, 19429666282000, -5626346310003250, 2034312191276462500, -898279284686285368750, 475692945053706430375000, -297573010648301986578906250

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A012977 A321526 A361057 * A173945 A111846 A290000

Adjacent sequences: A013105 A013106 A013107 * A013109 A013110 A013111

Keyword

sign

Author

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

Status

approved