A012895 Expansion of e.g.f.: arctanh(sin(x)+log(x+1))=2*x-1/2!*x^2+17/3!*x^3-54/4!*x^4+933/5!*x^5...

0, 2, -1, 17, -54, 933, -6870, 133689, -1657880, 36953013, -655575120, 16777241059, -387038985960, 11324556702587, -320046618771152, 10626198107224309, -353798609245392480, 13212399090164058153

Offset

0,2

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[ArcTanh[Sin[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, May 14 2016 *)

Crossrefs

Sequence in context: A242195 A012889 A013072 * A013077 A396358 A225768

Adjacent sequences: A012892 A012893 A012894 * A012896 A012897 A012898

Keyword

sign

Author

Patrick Demichel

Extensions

Zero prepended and definition clarified by Harvey P. Dale, May 14 2016

Status

approved