|
%I #13 Apr 15 2018 15:29:51
%S 1,0,-12,-248,-3504,115904,17130688,265254272,-452604387072,
%T -186145181366272,-61549828575435776,-19962789503984048128,
%U -6701962036325158170624,-2365314657819650153562112
%N Expansion of sin(sin(tan(x))).
%t With[{nn=30},Take[CoefficientList[Series[Sin[Sin[Tan[x]]],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Apr 15 2018 *)
%K sign
%O 0,3
%A _R. H. Hardin_
%E Extended with signs by _Olivier Gérard_, Mar 15 1997
%E Prior Mathematica program replaced by _Harvey P. Dale_, Apr 15 2018
|
