|
%I #14 Nov 13 2016 06:55:00
%S 1,1,3,181,59,3455,3332389,173339393,449509681,198232237033,
%T 1032475444411,101635950910031,71432133543444211,671713726985602398481
%N Numerator of [x^(2n+1)] in the Taylor expansion tan(cosec(x)-cot(x)).
%C The e.g.f. of x/2, tan(cosec(x)-cot(x)) = x/(2^1*1!) + 4*x^3/(2^3*3!) +72*x^5/(2^5*5!) + 2896*x^7/(2^7*7!) +.. is apparently covered by A003718.
%H G. C. Greubel, <a href="/A013519/b013519.txt">Table of n, a(n) for n = 0..125</a>
%e x/2 +x^3/12 +3*x^5/160 +181*x^7/40320 +59*x^9/53760 +3455*x^11/12773376 +...
%t Numerator[Take[CoefficientList[Series[Tan[Csc[x] - Cot[x]], {x, 0, 25}], x], {2, -1, 2}]] (* _G. C. Greubel_, Nov 12 2016 *)
%K nonn,frac
%O 0,3
%A Patrick Demichel (patric.demichel(AT)hp.com)
%E Name edited by _R. J. Mathar_, Dec 19 2011
|
