login
A012417
cosh(arctan(x)*exp(x))=1+1/2!*x^2+6/3!*x^3+17/4!*x^4+20/5!*x^5...
0
1, 0, 1, 6, 17, 20, 145, 2170, 8353, -41208, 12065, 8539278, 24846769, -999642020, -1683957327, 211007667650, 379515957057, -52699680395376, -66075776120255, 17106146184773014, 14435220017357137
OFFSET
0,4
MATHEMATICA
With[{nn=20}, CoefficientList[Series[Cosh[ArcTan[x]Exp[x]], {x, 0, nn}], x]Range[0, nn]!] (* Harvey P. Dale, Dec 15 2012 *)
CROSSREFS
Sequence in context: A035484 A277684 A009171 * A184549 A166025 A171786
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
STATUS
approved