OFFSET
0,4
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..500
Index entries for linear recurrences with constant coefficients, signature (6, -2, -29, 16, 40, -11, -14, 2, 1).
FORMULA
G.f.: (x^4+2*x^3-4*x^2-5*x-2)*x^3 / ((x+1) * (x^2-x-1) * (x^2+4*x-1) * (x^2-3*x+1) * (x^2+x-1)). - Alois P. Heinz, Jun 20 2012
MAPLE
a:= n-> (Matrix(9, (i, j)-> `if`(i=j-1, 1, `if`(i=9,
[1, 2, -14, -11, 40, 16, -29, -2, 6][j], 0)))^(n+3).
<<0, -1, 0, 0, 0, 0, 2, 17, 102>>)[1, 1]:
seq (a(n), n=0..30); # Alois P. Heinz, Jun 20 2012
MATHEMATICA
LinearRecurrence[{6, -2, -29, 16, 40, -11, -14, 2, 1}, {0, 0, 0, 2, 17, 102, 518, 2442, 11010}, 30] (* Jean-François Alcover, Feb 13 2016 *)
PROG
(PARI) x='x+O('x^50); concat([0, 0, 0], Vec((x^4+2*x^3-4*x^2-5*x-2)*x^3 / ((x+1) * (x^2-x-1) * (x^2+4*x-1) * (x^2-3*x+1) * (x^2+x-1)))) \\ G. C. Greubel, Mar 05 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jun 20 2012
STATUS
approved