|
%I #17 Nov 13 2016 06:58:20
%S -1,55,-4219,802171,-109684277,760100160121,-265779449377027,
%T 417652078505070229,-7396136516120375032117,1432995839205684739321951,
%U -63523043223346003438419401363,2351819493900615585072181702093
%N Numerator of [x^(2n+1)] of the Taylor expansion sin(cosec(x)-coth(x)).
%C The inner function is cosec(x) - coth(x) = -x/6 + x^3/24 - x^5/15120 + 17*x^7/40320 - x^9/23950080 + 691*x^11/159667200 - ...
%H G. C. Greubel, <a href="/A013537/b013537.txt">Table of n, a(n) for n = 0..199</a>
%e -x/6 + 55*x^3/1296 - 4219*x^5/6531840 + 802171*x^7/1410877440 - 109684277*x^9/5746705367040 + ...
%t Numerator[Take[CoefficientList[Series[Sin[Csc[x] - Coth[x]], {x,0,25}], x], {2, -1, 2}]] (* _G. C. Greubel_, Nov 13 2016 *)
%K sign,frac
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Name edited by _R. J. Mathar_, Dec 21 2011
| 