A047687 Numerators of coefficients in Taylor series for exp(sin(x)).

1, 1, 1, 0, -1, -1, -1, 1, 31, 1, -2951, -1, 181, 2417, 58913, -5699, -52635599, -19993, 1126610929, 3631, 27069353, -6050353, -118802490419, 47438, 11162375477471, 41478716501, -8529964147714967, -3818348299, -2610006147952249, 36698180928319

Offset: 0

Author

N. J. A. Sloane

Keywords

• sign
• easy
• frac

Examples

			1 + 1*x + (1/2)*x^2 - (1/8)*x^4 - (1/15)*x^5 - (1/240)*x^6 + (1/90)*x^7 + (31/5760)*x^8 + ...
		

References

• CRC Standard Mathematical Tables and Formulae, 30th ed. 1996, p. 42.

Links

• M. F. Hasler, Table of n, a(n) for n = 0..499

Crossrefs

Cf. A047688 (denominators), A002017 (e.g.f.).

Programs

Mathematica

Numerator[CoefficientList[Series[Exp[Sin[x]],{x,0,30}],x]] (* Harvey P. Dale, Jan 22 2015 *)

PARI

A047687_upto(N=99)=apply(numerator, Vec(exp(sin(x+O(x^N))))) \\ M. F. Hasler, Jun 07 2025