%I #6 Jan 16 2013 14:47:47
%S 1,0,1,0,5,-20,37,-700,1017,-28584,83769,-1514040,9304605,-108745468,
%T 1172343421,-11027747380,169643707825,-1567659515472,28786470143025,
%U -295814371937904,5793951884450549,-69644639946402276
%N E.g.f.: cosh(exp(x)-sec(x))=1+1/2!*x^2+5/4!*x^4-20/5!*x^5+37/6!*x^6...
%t With[{nn=30},CoefficientList[Series[Cosh[Exp[x]-Sec[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 16 2013 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Jan 16 2013
|