login
A013178
arctan(arctanh(x)+arctan(x))=2*x-16/3!*x^3+816/5!*x^5-100224/7!*x^7...
0
2, -16, 816, -100224, 23046912, -8501907456, 4600667731968, -3432263151550464, 3376634004034486272, -4235408050319799091200, 6597340706535893925101568, -12493980287273651231218728960
OFFSET
0,1
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcTanh[x]+ArcTan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Ray Chandler, Nov 29 2016 *)
CROSSREFS
Sequence in context: A013990 A013005 A013000 * A306000 A084595 A273193
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved