|
%I #10 Jan 06 2019 18:48:56
%S 0,1,2,5,20,125,830,6001,45768,394553,3699418,38758909,433324828,
%T 5299232757,68428221654,958395448297,14101599762448,223667919165041,
%U 3706771205012274,65843651814440309,1215858569345385636
%N Expansion of e.g.f. sinh(arcsin(x) * exp(x)).
%e x + 2/2!*x^2 + 5/3!*x^3 + 20/4!*x^4 + 125/5!*x^5 ...
%t With[{nn=30},CoefficientList[Series[Sinh[ArcSin[x]Exp[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 06 2019 *)
%K nonn
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E a(0) inserted and title improved by _Sean A. Irvine_, Jul 17 2018
|
