A012875 Expansion of e.g.f.: arctanh(sech(x)*log(x+1))=x-1/2!*x^2+1/3!*x^3-12/4!*x^4+63/5!*x^5...

0, 1, -1, 1, -12, 63, -375, 3687, -35056, 378613, -4917645, 67955413, -1033969596, 17404675923, -314140085987, 6110547378491, -127722302945280, 2840677016304009, -67146193511101593, 1681517639666168201

Offset

0,5

Links

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

Mathematica

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

Crossrefs

Sequence in context: A085463 A051922 A027810 * A275404 A162472 A008425

Adjacent sequences: A012872 A012873 A012874 * A012876 A012877 A012878

Keyword

sign

Author

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

Extensions

Zero prepended and definition clarified by Harvey P. Dale, Feb 16 2016

Status

approved