A012404 arctanh(arctan(x)*log(x+1))=2/2!*x^2-3/3!*x^3-10/5!*x^5+448/6!*x^6...

0, 0, 2, -3, 0, -10, 448, -3444, 10080, -62784, 2682432, -44090640, 365238720, -3190206240, 98622664320, -2518618203360, 38819985684480, -522802362915840, 13679170866554880, -437041001210135040

Offset

0,3

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[ArcTanh[ArcTan[x]*Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Ray Chandler, Nov 28 2016 *)

Crossrefs

Sequence in context: A012401 A012398 A012652 * A002099 A265514 A219341

Adjacent sequences: A012401 A012402 A012403 * A012405 A012406 A012407

Keyword

sign

Author

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

Status

approved