A096716 Denominators of terms in series expansion of tan(sin(x)).

1, 6, 40, 5040, 24192, 39916800, 6227020800, 37362124800, 355687428096000, 24329020081766400, 51090942171709440000, 2872446304320552960000, 5170403347776995328000000, 2177773890083670432153600000, 8841761993739701954543616000000, 249176928914482509628047360000000

Offset: 0

Author

N. J. A. Sloane, Aug 15 2004

Keywords

• nonn
• frac

Examples

			tan(sin(x)) = x + 1/6*x^3 - 1/40*x^5 - 107/5040*x^7 - 73/24192*x^9 + 41897/39916800*x^11 + ...
		

Links

• G. C. Greubel, Table of n, a(n) for n = 0..200

Crossrefs

Cf. A096712, A096664, A096671.

Cf. A003705.

Programs

Mathematica

Denominator[Take[CoefficientList[Series[Tan[Sin[x]], {x,0,50}], x], {2, -1, 2}]] (* G. C. Greubel, Nov 21 2016 *)