|
%I #6 Feb 03 2015 20:10:58
%S 0,0,2,-3,12,-40,310,-2331,22344,-214992,2532058,-32683915,481944980,
%T -7585016088,130778587966,-2420926296075,48554376131408,
%U -1038765449765536,23704180919254962,-572815315696075155
%N Expansion of e.g.f.: arcsin(sinh(x)*log(x+1))=2/2!*x^2-3/3!*x^3+12/4!*x^4-40/5!*x^5...
%t With[{nn=20},CoefficientList[Series[ArcSin[Sinh[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Feb 03 2015 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E a(0)=a(1)=zero prepended and definition clarified by _Harvey P. Dale_, Feb 03 2015
|
