A008993 Numerators of coefficients in expansion of cube root of sin(x).

1, -1, -1, -53, -191, -20353, -16080599, -2454263, -1929502811, -234796649489321, -5861873873476337, -216960814836289519, -709848919641928941541, -3162120754204994494571, -2121145877577124094947, -25314492944947070077552347103, -1647232883667178291585597345249

Offset

0,4

Links

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

Mathematica

Numerator[CoefficientList[Series[(Sin[x]/x)^(1/3), {x, 0, 50}], x][[1 ;; -1 ;; 2]]] (* G. C. Greubel, Jul 21 2018 *)

Crossrefs

Sequence in context: A142919 A142949 A061664 * A142088 A330810 A005146

Adjacent sequences: A008990 A008991 A008992 * A008994 A008995 A008996

Keyword

sign

Author

N. J. A. Sloane

Extensions

Terms a(14) onward added by G. C. Greubel, Jul 21 2018

Status

approved