OFFSET
1,2
FORMULA
MATHEMATICA
M = {{0, 0, 0, 2}, {1, 5, 0, 0}, {0, 2, 0, 0}, {0, 0, 1, 5}};
v[1] = {0, 1, 1, 2};
v[n_] := v[n] = M.v[n - 1];
a = Table[v[n][[1]], {n, 1, 50}]
CROSSREFS
KEYWORD
nonn,easy,less
AUTHOR
Roger L. Bagula, May 30 2005
EXTENSIONS
Edited by Associate Editors of the OEIS, Apr 05 2009
Meaningful name from Joerg Arndt, Dec 26 2022
STATUS
approved