login
A012411
arctan(arctan(x)*exp(x)) = x + 2/2!*x^2 - 1/3!*x^3 - 28/4!*x^4 - 107/5!*x^5 + ...
0
0, 1, 2, -1, -28, -107, 470, 10243, 51592, -677879, -15870422, -76105753, 2647708780, 62662672733, 171362144382, -21259413359701, -489069754224624, 774485831879569, 300884931182492754
OFFSET
0,3
MATHEMATICA
With[{nn=30}, CoefficientList[Series[ArcTan[ArcTan[x]*Exp[x]], {x, 0, nn}], x] Range[0, nn]!] (* Ray Chandler, Nov 28 2016 *)
CROSSREFS
Sequence in context: A322230 A353910 A353913 * A012415 A012660 A015155
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved