%I #14 Nov 13 2016 17:03:25
%S -2,4,-136,656,-47672,3091664,-16788784,15764283616,-3729134588968,
%T 119174509180016,-1148737050343959536,149765188779100064,
%U -756009870577278864656,3746439312393916961802272
%N Numerator of [x^(2n+1)] of the Taylor series sin(cot(x)-coth(x)).
%H G. C. Greubel, <a href="/A013552/b013552.txt">Table of n, a(n) for n = 0..200</a>
%e -2x/3 +4x^3/81 -136x^5/25515 +656x^7/688905-...
%t Numerator[Take[CoefficientList[Series[Sin[Cot[x] - Coth[x]], {x,0,26}], x], {2, -1, 2}]] (* _G. C. Greubel_, Nov 13 2016 *)
%K sign,frac
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Name edited by _R. J. Mathar_, Dec 21 2011
|