A012846 sinh(sec(x)*arctanh(x))=x+6/3!*x^3+120/5!*x^5+5376/7!*x^7...

1, 6, 120, 5376, 415104, 48143744, 7784817664, 1673986906112, 462531126525952, 159859054841331712, 67616604530628853760, 34373912421215807799296, 20685291456673100857344000

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Sinh[Sec[x]ArcTanh[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Oct 22 2014 *)

Crossrefs

Sequence in context: A094278 A093910 A002370 * A331640 A012641 A012795

Adjacent sequences: A012843 A012844 A012845 * A012847 A012848 A012849

Keyword

nonn

Author

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

Status

approved