OFFSET
0,1
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Sin[ArcTanh[x]*ArcTan[x]], {x, 0, nn}], x] Range[0, nn]!, {3, -1, 4}]] (* Ray Chandler, Nov 28 2016 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved