login
A013173
arctan(arctanh(x)+tan(x))=2*x-12/3!*x^3+488/5!*x^5-48608/7!*x^7...
0
2, -12, 488, -48608, 9080960, -2722798848, 1197871592448, -726520846829568, 581088281306562560, -592572418222512668672, 750419972539476482195456, -1155381150026866713259671552, 2125413346746653166067846742016
OFFSET
0,1
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcTanh[x]+Tan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Ray Chandler, Nov 29 2016 *)
CROSSREFS
Sequence in context: A357895 A012625 A012630 * A013147 A250110 A266501
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved