OFFSET
0,1
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Tanh[ArcTan[x]+Tan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -2, 2}]] (* Harvey P. Dale, Jan 28 2013 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved