A013413 cosh(arcsin(x)-arctan(x))=1+90/6!*x^6-2520/8!*x^8+368550/10!*x^10...

1, 0, 0, 90, -2520, 368550, -29313900, 7122965850, -1133998866000, 432213196164750, -115564330313932500, 64225795369647161250, -25965004352151980115000, 19884500689553832175593750

Offset

0,4

Links

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

Mathematica

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

Crossrefs

Sequence in context: A013357 A013358 A013414 * A013411 A013415 A367458

Adjacent sequences: A013410 A013411 A013412 * A013414 A013415 A013416

Keyword

sign

Author

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

Status

approved