login
A013317
Expansion of e.g.f.: tanh(exp(x) - cos(x)) = x + (2/2!)*x^2 - (1/3!)*x^3 - (24/4!)*x^4 - (123/5!)*x^5 + ...
0
0, 1, 2, -1, -24, -123, 2, 5987, 54544, 66441, -4948798, -71261177, -226393992, 9534896269, 201964922434, 1166083278955, -34861258001632, -1052810665903343, -9456771887276926, 211545075206125327
OFFSET
0,3
MATHEMATICA
With[{nn=20}, CoefficientList[Series[Tanh[Exp[x]-Cos[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Mar 05 2023 *)
CROSSREFS
Sequence in context: A101179 A184295 A013313 * A010256 A087452 A317385
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Zero prepended and definition clarified by Harvey P. Dale, Mar 05 2023
Offset corrected for above change by Sean A. Irvine, Mar 19 2023
STATUS
approved