A012581 cosh(arcsinh(x)*log(x+1))=1+12/4!*x^4-60/5!*x^5+210/6!*x^6...

1, 0, 0, 0, 12, -60, 210, -1260, 14448, -139104, 1131720, -11676720, 163234632, -2192512608, 27259115520, -393931268640, 6898028418048, -119527801113984, 1985315996055744, -36767841202329984

Offset

0,5

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..446

Mathematica

CoefficientList[Series[Cosh[ArcSinh[x]*Log[1 + x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Feb 04 2015 *)

Crossrefs

Sequence in context: A009049 A012577 A009148 * A012288 A012582 A260356

Adjacent sequences: A012578 A012579 A012580 * A012582 A012583 A012584

Keyword

sign

Author

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

Status

approved