OFFSET
1,9
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,1,0,1).
FORMULA
a(n) = a(n - 6) + a(n - 8).
G.f.: -x*(x+1)*(x^2-x+1)*(x^2+x+1)/(x^8+x^6-1). - Colin Barker, Oct 19 2012
MATHEMATICA
Rest[CoefficientList[Series[-x*(x + 1)*(x^2 - x + 1)*(x^2 + x + 1)/(x^8 + x^6 - 1), {x, 0, 50}], x]] (* G. C. Greubel, May 01 2017 *)
PROG
(PARI) a(n)=([0, 1, 0, 0, 0, 0, 0, 0; 0, 0, 1, 0, 0, 0, 0, 0; 0, 0, 0, 1, 0, 0, 0, 0; 0, 0, 0, 0, 1, 0, 0, 0; 0, 0, 0, 0, 0, 1, 0, 0; 0, 0, 0, 0, 0, 0, 1, 0; 0, 0, 0, 0, 0, 0, 0, 1; 1, 0, 1, 0, 0, 0, 0, 0]^(n-1)*[1; 1; 1; 1; 1; 1; 1; 1])[1, 1] \\ Charles R Greathouse IV, Oct 03 2016
(PARI) x='x+O('x^50); Vec(-x*(x+1)*(x^2-x+1)*(x^2+x+1)/(x^8+x^6-1)) \\ G. C. Greubel, May 01 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Sep 16 2006
STATUS
approved