login
A012713
E.g.f.: arctan(arctanh(x)*exp(x))=x+2/2!*x^2+3/3!*x^3-12/4!*x^4-147/5!*x^5...
0
0, 1, 2, 3, -12, -147, -890, 63, 76776, 1130489, 6587338, -92728933, -3395342500, -47724446811, -11416580786, 18058083754519, 494993369091536, 5229048665015409, -122759838344591214, -7368934381520578637
OFFSET
0,3
MATHEMATICA
With[{nn=20}, CoefficientList[Series[ArcTan[ArcTanh[x]Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 06 2013 *)
CROSSREFS
Sequence in context: A102878 A132501 A067338 * A009814 A362289 A345040
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Definition clarified and initial term provided by Harvey P. Dale, Dec 06 2013
STATUS
approved