login
Expansion of tan(sin(x))*cosh(x).
0

%I #14 May 15 2021 20:15:27

%S 1,4,12,-128,-5232,-54848,5325504,403442176,558723328,-2994514283520,

%T -295655443772416,17110494845845504,9628494110111469568,

%U 971219320278689300480,-262986198032101769035776

%N Expansion of tan(sin(x))*cosh(x).

%t With[{nn=30},Take[CoefficientList[Series[Tan[Sin[x]]Cosh[x],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, May 15 2021 *)

%K sign

%O 0,2

%A _R. H. Hardin_

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

%E Previous Mathematica program replaced by _Harvey P. Dale_, May 15 2021