A013555 Numerator of [x^(2n+1)] of the Taylor series arctan(cot(x)-coth(x))= -2*x/3 +8*x^3/81 -52*x^5/1701 +112*x^7/10935 -51412*x^9/13640319+...

-2, 8, -52, 112, -51412, 3469712, -2491688, 62534458528, -22811578796, 1052637839125232, -1951793355443020696, 1800318713817966304, -132444323199647003032, 130585857053193268706729632, -9112129339306147838595664

Offset

0,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..100

Mathematica

Numerator[Take[CoefficientList[Series[ArcTan[Cot[x] - Coth[x]], {x, 0, 35}], x], {2, -2, 2}]] (* Vincenzo Librandi, Nov 12 2016 *)

Crossrefs

Sequence in context: A059429 A249747 A191480 * A018987 A030518 A123188

Adjacent sequences: A013552 A013553 A013554 * A013556 A013557 A013558

Keyword

sign,frac

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Extensions

Name edited by R. J. Mathar, Dec 22 2011

Status

approved