login
Expansion of e.g.f.: sinh(exp(x)-cos(x))=x+2/2!*x^2+2/3!*x^3+12/4!*x^4+72/5!*x^5...
0

%I #7 Jul 30 2019 14:00:19

%S 0,1,2,2,12,72,272,968,5488,36144,204512,1135840,7577856,56287168,

%T 406104064,2933384704,23084016896,194919700480,1664627753984,

%U 14417113925632,131148402111488,1251412558922752,12211894620549120

%N Expansion of e.g.f.: sinh(exp(x)-cos(x))=x+2/2!*x^2+2/3!*x^3+12/4!*x^4+72/5!*x^5...

%t With[{nn=30},CoefficientList[Series[Sinh[Exp[x]-Cos[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jul 30 2019 *)

%K nonn

%O 1,3

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

%E Zero prepended and definition clarified by _Harvey P. Dale_, Jul 30 2019