A012060 cosh(sin(arctanh(x)))=1+1/2!*x^2+5/4!*x^4+61/6!*x^6+937/8!*x^8...

1, 1, 5, 61, 937, -34919, -13257619, -3269873515, -890367567919, -286428853272143, -109915623105978539, -50081947723080008339, -26861824093922170259335, -16800404374717805427318199

Offset

0,3

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Cosh[Sin[ArcTanh[x]]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jul 09 2021 *)

Crossrefs

Sequence in context: A236955 A064328 A363867 * A012167 A162167 A134282

Adjacent sequences: A012057 A012058 A012059 * A012061 A012062 A012063

Keyword

sign

Author

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

Status

approved