OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (-2, -6, -11, -19, -27, -34, -38, -36, -30, -21, -12, -5, -1).
FORMULA
a(n) = -2*a(n-1) -6*a(n-2) -11*a(n-3) -19*a(n-4) -27*a(n-5) -34*a(n-6) -38*a(n-7) -36*a(n-8) -30*a(n-9) -21*a(n-10) -12*a(n-11) -5*a(n-12) -a(n-13).
MATHEMATICA
a = {t^2 + t + 1, tau^2 + tau + 1, x^3 + x + 1, y^3 + y + 1, z^3 + z + 1} /. y -> x /. z -> x /. t -> x /. tau -> x
p[x_] = Product[a[[n]], {n, 1, 5}]
q[x_] = Expand[x^13*p[1/x]]
Table[ SeriesCoefficient[ Series[1/q[x], {x, 0, 30}], n], {n, 0, 30}]
CoefficientList[Series[1/((1 + x + x^2)^2*(1 + x^2 + x^3)^3), {x, 0, 100}], x] (* G. C. Greubel, Jun 04 2016 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Roger L. Bagula, Oct 29 2009
STATUS
approved