login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Expansion of e.g.f.: cosh(x)/exp(sin(x)).
0

%I #13 Jun 11 2017 18:19:36

%S 1,-1,2,-3,4,3,-32,105,-48,-1081,5600,-5643,-85568,547467,-533504,

%T -12925983,85827840,-21466225,-3149702656,19155660141,27282224128,

%U -1094661097965,5424499154944,26420430767577,-496815684169728,1642571602653527

%N Expansion of e.g.f.: cosh(x)/exp(sin(x)).

%t With[{nn=30},CoefficientList[Series[Cosh[x]/Exp[Sin[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jun 11 2017 *)

%K sign,easy

%O 0,3

%A _R. H. Hardin_

%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997

%E Definition clarified and previous Mathematica program replaced by _Harvey P. Dale_, Jun 11 2017