A013112 cosh(arcsinh(x)+arctan(x))=1+4/2!*x^2-8/4!*x^4+70/6!*x^6-920/8!*x^8...

1, 4, -8, 70, -920, -28550, 10642900, -2554095050, 685535422000, -219648785612750, 84602550046787500, -38917136125065331250, 21166653214210218325000, -13470291608750677967093750

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A285634 A228930 A051226 * A274461 A206346 A240503

Adjacent sequences: A013109 A013110 A013111 * A013113 A013114 A013115

Keyword

sign

Author

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

Status

approved