OFFSET
0,3
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Sech[ArcTan[x]^2], {x, 0, nn}] , x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Apr 30 2012 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Definition corrected by Harvey P. Dale, Apr 30 2012
STATUS
approved