login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A013216
Expansion of e.g.f. arcsinh(log(x+1) - sin(x)).
0
0, 0, -1, 3, -6, 23, -105, 406, -1260, 1385, 48195, -816794, 7746354, -28590343, -859023165, 32103094024, -771444393720, 15805494180377, -295855009807833, 5153505812257222, -82415471899841090
OFFSET
0,4
EXAMPLE
-1/2!*x^2 + 3/3!*x^3 - 6/4!*x^4 + 23/5!*x^5 ...
MATHEMATICA
With[{nn=30}, Drop[CoefficientList[Series[ArcSinh[Log[x+1]-Sin[x]], {x, 0, nn}], x] Range[0, nn]!, 2]] (* Harvey P. Dale, Oct 02 2016 *)
CROSSREFS
Sequence in context: A148648 A013213 A013217 * A013210 A264792 A013215
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
a(0)=a(1)=0 inserted and title improved by Sean A. Irvine, Aug 01 2018
STATUS
approved