OFFSET
0,6
LINKS
Index entries for linear recurrences with constant coefficients, signature (1, 1, -1, 0, 1).
FORMULA
G.f.: (-1+x)*(1+x)*(2*x^5+x^2-x+1)/(-1+x+x^2-x^3+x^5). [Sep 28 2009]
MATHEMATICA
M = {{0, 1, 0, 0, 0}, {0, 0, 1, 0, 0}, {0, 0, 0, 1, 0}, {0, 0, 0, 0, 1}, {1, 0, -1, 1, 1}} v[1] = {1, 0, -1, 1, 1} v[n_] := v[n] = M.v[n - 1] a = Table[Abs[v[n][[1]]], {n, 1, 50}]
LinearRecurrence[{1, 1, -1, 0, 1}, {1, 0, 1, 1, 1, 4, 4, 6}, 50] (* Harvey P. Dale, Sep 24 2015 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Jun 08 2005
EXTENSIONS
Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009
STATUS
approved