login

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

Expansion of sin(tan(x))*x.
1

%I #13 May 27 2022 11:47:37

%S 0,2,4,-18,-2200,-150150,-11618004,-1078005082,-118928710576,

%T -15184771406478,-2148536703814700,-309605570133329954,

%U -34193099991177752904,4268254817856544829418,6637048590856623019431932

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

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

%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 27 2022