A045688 Numerators of expansion of tan(sin(x)) - sin(tan(x)).

0, 0, 0, 1, 29, 1913, 95, 311148869, 10193207, 1664108363, 2097555460001, 374694625074883, -48074332710505411, -4945837680716249285383, -2229960300928783674917, -24840355960694307625698893, -4153678459092607393588136503, -61444568105054860319920405585007, -335560999071136641584079760493377

Offset: 0

Author

N. J. A. Sloane

Keywords

• sign
• frac

Examples

			1/30*x^7 + 29/756*x^9 + 1913/75600*x^11 + O(x^12).
		

References

• V. I. Arnold, Huygens and Barrow, Newton and Hooke, Birkhäuser, Basel, 1990.

Crossrefs

Cf. A045689 (denominators), A096664, A096671, A096712, A096716.

Programs

Mathematica

Plot[Tan[Sin[x]]-Sin[Tan[x]], {x, 0, π/2}]  (* Shows plot, which, as Bill Gosper and Neil Bickford remark, is ultraflat near 0 and has wild oscillations near Pi/2. - N. J. A. Sloane, Apr 11 2013 *)