OFFSET
0,2
COMMENTS
REFERENCES
0
LINKS
Index entries for linear recurrences with constant coefficients, signature (2, -1, 1, -2, 1).
FORMULA
MATHEMATICA
CoefficientList[ Series[-(4x^4 +x^3 +x^2 +1)/((x -1)^3 (x^2 +x +1)), {x, 0, 50}], x] (* or *)
LinearRecurrence[{2, -1, 1, -2, 1}, {1, 2, 4, 8, 16}, 50] (* Robert G. Wilson v, Jul 18 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Curtz, Jul 17 2018
STATUS
approved