|
|
A013556
|
|
Numerator of [x^(2n)] of the Taylor series cos(cot(x)-coth(x))= 1 -2*x^2/9 +2*x^4/243 -676*x^6/229635 +62*x^8/295245 -...
|
|
1
|
|
|
1, -2, 2, -676, 62, -2714132, 7223932, -120994136, 13831453742, -463898158095404, 1539871314859772, -1284535259155106488, 5072225817430199548, -10084534723769793975176, 4033550950013006300665768, -325181210925396330786544500464, 435279229771188834270330121078
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Numerator[Take[CoefficientList[Series[Cos[Cot[x] - Coth[x]], {x, 0, 35}], x], {1, -2, 2}]] (* Vincenzo Librandi, Nov 12 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,frac
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|