login

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

Expansion of sin(sinh(x)/cos(x)).
0

%I #13 Feb 25 2023 17:11:26

%S 1,3,-3,-1113,-77063,-5509845,-430006731,-33282260529,-1454472663311,

%T 448480622503635,254015086363619949,101877925964986614135,

%U 39296835590108099513833,15506451718661316904568571

%N Expansion of sin(sinh(x)/cos(x)).

%t With[{nn=30},Take[CoefficientList[Series[Sin[Sinh[x]/Cos[x]],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Feb 25 2023 *)

%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_, Feb 25 2023