This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A096725 #12 Feb 25 2018 22:54:50
%S A096725 1,5,1313,-2773,-701933647,-86849082293,-174426488476171,
%T A096725 -130176915706274917,-42426469007472079018663,
%U A096725 -24495552034235134641205327,-3019410235003955483667737236843,-74265172933666226350348992663473,-2457268368880426576340457161112391,-589361165665450343618737576026916723726003
%N A096725 Numerators of terms in series expansion of (sin(tan(x)) - tan(sin(x))) / (arcsin(arctan(x)) - arctan(arcsin(x))).
%D A096725 V. I. Arnold, Huygens and Barrow, Newton and Hooke, Birkhäuser, Basel, 1990.
%H A096725 G. C. Greubel, <a href="/A096725/b096725.txt">Table of n, a(n) for n = 0..180</a>
%e A096725 (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 - ...
%t A096725 Numerator[Take[CoefficientList[Series[(Sin[Tan[x]] - Tan[Sin[x]]) / (ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]]), {x,0,50}], x], {1, -1, 2}]] (* _G. C. Greubel_, Nov 20 2016 *)
%Y A096725 Cf. A096730, A096722, A096717, A096718, A096664, A096671, A096712, A096716, A045688, A045689, A096719, A096720.
%K A096725 sign,frac
%O A096725 0,2
%A A096725 _N. J. A. Sloane_, Aug 15 2004