A012982 cosh(arctan(x)+sin(x))=1+4/2!*x^2-8/4!*x^4-26/6!*x^6+424/8!*x^8...

1, 4, -8, -26, 424, 4314, 1175508, -586563610, 202456213808, -74723085885198, 31720351727685548, -15704109567909173154, 9057266333254873075336, -6050602176713431738303574, 4648623295941041403621558724

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..25

Mathematica

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

Crossrefs

Sequence in context: A297695 A333894 A218079 * A012952 A272588 A272228

Adjacent sequences: A012979 A012980 A012981 * A012983 A012984 A012985

Keyword

sign

Author

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

Status

approved