|
%I #6 Mar 31 2019 11:48:39
%S 1,0,0,-160,0,-261120,3942400,-1538068480,111522611200,
%T -25458261360640,5279051703910400,-1021353507684352000,
%U 440307608869404672000,-89935097031558126632960
%N cos(tan(x)-tanh(x))=1-160/6!*x^6-261120/10!*x^10+3942400/12!*x^12...
%t With[{nn=30},Take[CoefficientList[Series[Cos[Tan[x]-Tanh[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Mar 31 2019 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
