OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..200
Index entries for linear recurrences with constant coefficients, signature (7,0,0,1,-7).
FORMULA
From Colin Barker, Apr 30 2014: (Start)
a(n) = (-100-25*(-1)^n-(24-i*32)*(-i)^n-(24+32*i)*i^n+173*7^n)/400, where i=sqrt(-1).
a(n) = 7*a(n-1)+a(n-4)-7*a(n-5).
G.f.: x*(2*x^3+x^2+3) / ((x-1)*(x+1)*(7*x-1)*(x^2+1)). (End)
MATHEMATICA
CoefficientList[Series[(2 x^3 + x^2 + 3)/((x - 1) (x + 1) (7 x - 1) (x^2 + 1)), {x, 0, 30}], x] (* Vincenzo Librandi, May 01 2014 *)
PROG
(PARI) Vec(x*(2*x^3+x^2+3)/((x-1)*(x+1)*(7*x-1)*(x^2+1)) + O(x^100)) \\ Colin Barker, Apr 30 2014
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
STATUS
approved