|
%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
|
