|
%I #6 Nov 25 2012 16:27:41
%S 1,0,0,0,12,-60,570,-3780,43680,-447552,6232200,-82861680,1313835336,
%T -21072521184,381305512224,-7156099161120,146595771528960,
%U -3138961332436864,71962899144642240
%N sec(tan(x)*log(x+1))=1+12/4!*x^4-60/5!*x^5+570/6!*x^6-3780/7!*x^7...
%t With[{nn=20},CoefficientList[Series[Sec[Tan[x]Log[x+1]],{x,0,nn}],x]Range[0,nn]!] (* _Harvey P. Dale_, Nov 25 2012 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
