|
|
A096730
|
|
Denominators of terms in series expansion of (sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))).
|
|
2
|
|
|
1, 3, 1890, 11907, 1650310200, 270320810760, 851510553894000, 1003164583542521400, 480315202600159246320000, 393378150929530422736080000, 62700543476657854079903791200000, 1975067119514722403516969422800000, 76571832941186160874811737622400000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
REFERENCES
|
V. I. Arnold, Huygens and Barrow, Newton and Hooke, Birkhäuser, Basel, 1990.
|
|
LINKS
|
|
|
EXAMPLE
|
(sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))) = 1 + 5/3*x^2 + 1313/1890*x^4 - 2773/11907*x^6 - 701933647/1650310200*x^8 - 86849082293/270320810760*x^10 - ...
|
|
MATHEMATICA
|
Denominator[Take[CoefficientList[Series[(Sin[Tan[x]] - Tan[Sin[x]]) / (ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]]), {x, 0, 10}], x], {1, -1, 2}]] (* G. C. Greubel, Nov 20 2016 *)
|
|
CROSSREFS
|
Cf. A096725, A096722, A096717, A096718, A096664, A096671, A096712, A096716, A045688, A045689, A096719, A096720.
|
|
KEYWORD
|
nonn,frac
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|