login
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

%I #12 Mar 19 2023 17:47:07

%S 0,1,2,-1,-24,-123,2,5987,54544,66441,-4948798,-71261177,-226393992,

%T 9534896269,201964922434,1166083278955,-34861258001632,

%U -1052810665903343,-9456771887276926,211545075206125327

%N 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 + ...

%t With[{nn=20},CoefficientList[Series[Tanh[Exp[x]-Cos[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 05 2023 *)

%K sign

%O 0,3

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E Zero prepended and definition clarified by _Harvey P. Dale_, Mar 05 2023

%E Offset corrected for above change by _Sean A. Irvine_, Mar 19 2023