OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (13, -57, 83, 34, -120).
FORMULA
a(n) = (1/360)*(6250*5^n - 9216*4^n + 3645*3^n - 320*2^n + (-1)^n).
MATHEMATICA
CoefficientList[Series[1/((1+x)(1-2x)(1-3x)(1-4x)(1-5x)), {x, 0, 20}], x] (* or *) LinearRecurrence[{13, -57, 83, 34, -120}, {1, 13, 112, 798, 5103}, 20] (* Harvey P. Dale, Jan 17 2024 *)
PROG
(Magma) [(1/360)*(6250*5^n - 9216*4^n + 3645*3^n - 320*2^n + (-1)^n): n in [0..20]]; // Vincenzo Librandi, Oct 11 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Ralf Stephan, Sep 28 2004
STATUS
approved