login
A012844
arctan(sec(x)*arctanh(x))=x+3/3!*x^3-7/5!*x^5-917/7!*x^7-7183/9!*x^9...
0
1, 3, -7, -917, -7183, 3803987, 316369129, -40892465221, -12655402122271, 1539257113273507, 1652188971379360217, 198029913991075323147, -231213557728594141960239, -76270663840340687485107213
OFFSET
0,2
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[ArcTan[Sec[x]ArcTanh[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Sep 18 2013 *)
CROSSREFS
Sequence in context: A092568 A055624 A065244 * A104052 A062625 A175986
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Definition clarified by Harvey P. Dale, Sep 18 2013
STATUS
approved