A013264 arcsinh(log(x+1)-sinh(x))=-1/2!*x^2+1/3!*x^3-6/4!*x^4+23/5!*x^5...

0, 0, -1, 1, -6, 23, -105, 614, -3500, 23785, -168525, 1248014, -10232046, 87236225, -878874997, 11019659832, -176261549880, 3445590738361, -73605307413177, 1643075339474150, -37315705749869570, 854635215667984933

Offset

0,5

Links

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

Mathematica

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

Crossrefs

Sequence in context: A038383 A120775 A013258 * A369835 A369831 A063383

Adjacent sequences: A013261 A013262 A013263 * A013265 A013266 A013267

Keyword

sign

Author

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

Extensions

Prepended missing a(0)=a(1)=0 from Vaclav Kotesovec, Feb 04 2015

Status

approved