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,2

Links

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

Example

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

Mathematica

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

Crossrefs

Cf. A096712, A096664, A096671.

Cf. A003705.

Sequence in context: A196712 A086803 A136382 * A354331 A000611 A043069

Adjacent sequences: A096713 A096714 A096715 * A096717 A096718 A096719

Keyword

nonn,frac

Author

N. J. A. Sloane, Aug 15 2004

Status

approved