|
%I #17 Apr 01 2017 15:44:16
%S 1,2,8,-344,-44416,-5130368,-688030080,-109875416832,-20650894622720,
%T -4460981432725504,-1069938200055119872,-268541150093198032896,
%U -60666450534816002965504,-3605301387144067469213696
%N Expansion of sin(sinh(tan(x))).
%H Robert Israel, <a href="/A009489/b009489.txt">Table of n, a(n) for n = 0..234</a>
%F sin(sinh(tan(x))) = Sum_{n>=0} a(n)*x^(2*n+1)/(2*n+1)!. - _Robert Israel_, Nov 23 2016
%p S:= series(sin(sinh(tan(x))),x,51):
%p seq(coeff(S,x,j)*j!, j=1..49,2); # _Robert Israel_, Nov 23 2016
%t Sin[ Sinh[ Tan[ x ] ] ] (* Odd Part *)
%t Take[Table[n!*SeriesCoefficient[Sin[Sinh[Tan[x]]], {x, 0, n}], {n,0,15}], {2, -1, 2}] (* _G. C. Greubel_, Nov 23 2016 *)
%K sign
%O 0,2
%A _R. H. Hardin_
%E Extended with signs by _Olivier Gérard_, Mar 15 1997
|
