login
A012742
arctan(arctanh(x)*cos(x))=x-3/3!*x^3+53/5!*x^5-1799/7!*x^7...
0
1, -3, 53, -1799, 154985, -16589771, 3172731677, -721614303695, 241340829836497, -94965599172723859, 49224836859318783493, -29702702631352493918103, 22109389701103652762325561
OFFSET
0,2
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcTanh[x]Cos[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Nov 05 2015 *)
CROSSREFS
Sequence in context: A273802 A216931 A352992 * A012823 A098932 A100444
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Definition modified by Harvey P. Dale, Nov 05 2015
STATUS
approved