|
%I #18 Nov 13 2016 06:57:52
%S -1,13,877,2675,8260913,410433607,223758294041,27276568423051,
%T 127639993821278611,10512596641186789291,8302408982767874894797,
%U 3077103479886222660379217
%N Numerator of the coefficient [x^(2n+1)] of the Taylor series tan(cosec(x)-coth(x)).
%H G. C. Greubel, <a href="/A013539/b013539.txt">Table of n, a(n) for n = 0..200</a>
%e -x/6 + 13*x^3/324 + 877*x^5/816480 + 2675*x^7/17635968 + ...
%t Numerator[Take[CoefficientList[Series[Tan[Csc[x] - Coth[x]], {x,0,26}], 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
|
