|
%I #9 Oct 12 2012 19:05:27
%S 0,1,0,2,-4,12,-120,128,-4464,6912,-206880,776800,-12788224,95713984,
%T -1101528064,13091780224,-133871961344,2061579919104,-22144979338752,
%U 381671021731840,-4690276122840064,83860033272100864
%N sinh(exp(x)-sec(x)) = x + 2/3!*x^3 - 4/4!*x^4 + 12/5!*x^5 - 120/6!*x^6 + ...
%t With[{nn=30}, CoefficientList[Series[Sinh[Exp[x]-Sec[x]], {x,0,nn}], x] Range[0,nn]!] (* _Harvey P. Dale_, Oct 12 2012 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
