|
%I #6 May 22 2014 13:10:31
%S 0,2,-1,-7,18,-13,135,-1614,10612,-71215,637515,-6443034,67830114,
%T -769960735,9523596355,-126475570464,1788373677960,-26860585215767,
%U 427142221117623,-7163185240710714,126244734481260190
%N E.g.f.: sin(sin(x)+log(x+1))=2*x-1/2!*x^2-7/3!*x^3+18/4!*x^4-13/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Sin[Sin[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 22 2014 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified and zero prepended by _Harvey P. Dale_, May 22 2014
|
