|
%I #6 Aug 27 2015 19:07:44
%S 0,1,-2,3,-12,73,-440,2779,-23968,260177,-2866432,32853491,-441968384,
%T 6787498521,-108247087104,1803655970635,-33080353591296,
%U 660549566885793,-13769854019436544,299826162055728355
%N Expansion of e.g.f.: log(cos(x)+arctan(x))=x-2/2!*x^2+3/3!*x^3-12/4!*x^4+73/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Log[Cos[x]+ArcTan[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Aug 27 2015 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Zero prepended and definition clarified by _Harvey P. Dale_, Aug 27 2015
|
