OFFSET
0,4
LINKS
Index entries for linear recurrences with constant coefficients, signature (0,5,0,-6,0,1).
MATHEMATICA
CoefficientList[Series[-x(1+x-x^2+x^3+4x^4)/((x^3-2x^2-x+1)(x^3+ 2x^2- x-1)), {x, 0, 40}], x] (* or *) LinearRecurrence[{0, 5, 0, -6, 0, 1}, {0, 1, 1, 4, 6, 18}, 40] (* Harvey P. Dale, Feb 05 2012 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula and Gary W. Adamson, Jun 30 2006
STATUS
approved