OFFSET
0,4
LINKS
Index entries for linear recurrences with constant coefficients, signature (1,1,0,-1,0,1).
FORMULA
G.f.: -x*(1+x^4) / ( -1+x+x^2-x^4+x^6 ). - R. J. Mathar, Jul 14 2014
MAPLE
with(linalg): M:=matrix(6, 6, [0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, -1, 0, 1, 1]): w[0]:=matrix(6, 1, [0, 1, 1, 2, 3, 5]): for n from 1 to 45 do w[n]:=multiply(M, w[n-1]) od: seq(w[n][1, 1], n=0..45);
MATHEMATICA
M = {{0, 1, 0, 0, 0, 0 }, {0, 0, 1, 0, 0, 0}, {0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0}, {0, 0, 0, 0, 0, 1}, {1, 0, -1, 0, 1, 1}}; w[1] = {0, 1, 1, 2, 3, 5}; w[n_] := w[n] = M.w[n - 1] Table[w[n][[1]], {n, 1, 25}]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Apr 15 2006
EXTENSIONS
Edited by N. J. A. Sloane, Apr 30 2006
STATUS
approved