%I #7 Dec 12 2023 18:33:39
%S 0,1,1,11,17,187,901,61403,19849,11566657,18712297,1110228313,
%T 5389037609,1360276717489,2200966584493,747861093416219,
%U 1210064076159749,59172849569407033,34467722993604601,476833062569954186123,771532094165273524673,524313365828795638534321
%N Numerators of coefficients in expansion of (sin(x))/(1 - x - x^2).
%H Clark Kimberling, <a href="/A279332/b279332.txt">Table of n, a(n) for n = 0..1000</a>
%e (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.
%t z = 30; t = CoefficientList[Series[Sin[x]/(1 - x - x^2), {x, 0, z}], x];
%t Numerator[t] (* A279332 *)
%t Denominator[t] (* A279333 *)
%Y Cf. A279333.
%K nonn,easy,frac
%O 0,4
%A _Clark Kimberling_, Dec 12 2016
|