A279333 Denominators of coefficients in expansion of (sin(x))/(1 - x - x^2).

1, 1, 1, 6, 6, 40, 120, 5040, 1008, 362880, 362880, 13305600, 39916800, 6227020800, 6227020800, 1307674368000, 1307674368000, 39520825344000, 14227497123840, 121645100408832000, 121645100408832000, 51090942171709440000, 51090942171709440000

Offset

0,4

Links

Clark Kimberling, Table of n, a(n) for n = 0..1000

Example

(0/1) + (1/1)x + (1/1)x^2 + (11/6)x^3 + (17/6)x^4 ... ;  0/1, 1/1, 1/1, 11/6, ... = A279332/A279333.

Mathematica

z = 30; t = CoefficientList[Series[Sin[x]/(1 - x - x^2), {x, 0, z}], x];
Numerator[t]   (* A279332 *)
Denominator[t] (* A279333 *)

Crossrefs

Cf. A279332.

Sequence in context: A196075 A156099 A278435 * A278734 A279535 A125510

Adjacent sequences: A279330 A279331 A279332 * A279334 A279335 A279336

Keyword

nonn,easy,frac

Author

Clark Kimberling, Dec 12 2016

Status

approved