|
|
A096664
|
|
Numerators of terms in series expansion of sin(tan(x)).
|
|
16
|
|
|
1, 1, -1, -55, -143, -968167, -7000033, -571772647, -843598411471, -1263845119891, -740683182137153, -474904166544135457, 2379183287545454197, 237037449673450822122569, 155015924346163216960553093, 50568039962561468889366023, 1801162678607996830733199407999, 2359789149102567189423591182268559
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
EXAMPLE
|
sin(tan(x)) = x + 1/6*x^3 - 1/40*x^5 - 55/1008*x^7 - 143/3456*x^9 + ...
|
|
MATHEMATICA
|
Numerator[Take[CoefficientList[Series[Sin[Tan[x]], {x, 0, 40}], x], {2, -1, 2}]] (* G. C. Greubel, Nov 17 2016 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|