A013078 cosh(arcsinh(x)+log(x+1))=1+4/2!*x^2-6/3!*x^3+27/4!*x^4-150/5!*x^5...

1, 0, 4, -6, 27, -150, 900, -5985, 47565, -442260, 4450950, -47868975, 571153275, -7552695150, 106248542400, -1572657211125, 25057160753625, -430628407209000, 7779251376146250, -146478623943526875

Offset

0,3

Links

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

Formula

a(n) ~ n! * (-1)^n * (1 + sqrt(2))/2. - Vaclav Kotesovec, Feb 04 2015

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: A068321 A349647 A012896 * A106286 A066293 A204385

Adjacent sequences: A013075 A013076 A013077 * A013079 A013080 A013081

Keyword

sign

Author

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

Status

approved