A012744 sinh(arctanh(x)*cos(x))=x+504/7!*x^7+24384/9!*x^9+2375296/11!*x^11...

1, 0, 0, 504, 24384, 2375296, 338479232, 64501554688, 16130341302272, 5112670099460096, 2003580047549120512, 951418445045046378496, 538352433444301745848320, 357916525207050277213175808

Offset

0,4

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sinh[ArcTanh[x]Cos[x]], {x, 0, nn}], x]Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Nov 20 2011 *)

Crossrefs

Sequence in context: A012829 A013973 A218132 * A291116 A145095 A035293

Adjacent sequences: A012741 A012742 A012743 * A012745 A012746 A012747

Keyword

nonn,easy

Author

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

Status

approved