A024276 Expansion of sinh(tan(x)*sinh(x))/2.

0, 1, 6, 131, 6636, 478981, 46186866, 5850470471, 949119838296, 191928333160201, 47247581207762526, 13887944994837826571, 4798123437751335493956, 1923214499293440219360781

Offset

0,3

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sinh[(Tan[x]Sinh[x])]/2, {x, 0, nn}], x]Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jan 22 2012 *)

Crossrefs

A009610.

Sequence in context: A337971 A281402 A137038 * A137037 A101131 A256239

Adjacent sequences: A024273 A024274 A024275 * A024277 A024278 A024279

Keyword

nonn

Author

R. H. Hardin

Extensions

Extended and signs tested 03/97.

Status

approved