OFFSET
0,4
LINKS
Index entries for linear recurrences with constant coefficients, signature (0, 4691, 9389).
MATHEMATICA
M = {{0, 1, 0}, {0, 0, 1}, {9389, 4691, 0}}; w[0] = {0, 1, 1}; w[n_] := w[n] = M.w[n - 1]; a = Flatten[Table[w[n][[1]], {n, 0, 25}]]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Feb 15 2006
EXTENSIONS
Better name from Colin Barker, Dec 26 2012
STATUS
approved