|
%I #18 Nov 13 2016 06:56:42
%S -1,53,3341,391337,710371933,6178130243,225570264096917,
%T 1546226961439379,5665951032145572087083,-1602619428542796266047,
%U 218332153959703843484481031721,-149315097238822774731841867
%N Numerator of the coefficient [x^(2n+1)] of the Taylor series sinh(cosec(x) - coth(x)).
%C A bisection of A013536. Denominators appear to be a bisection of A202382.
%H G. C. Greubel, <a href="/A013542/b013542.txt">Table of n, a(n) for n = 0..193</a>
%e -x/6 + 53*x^3/1296 + 3341*x^5/6531840 + 391337*x^7/1410877440 + ...
%t Numerator[Take[CoefficientList[Series[Sinh[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
|
