OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,1).
FORMULA
O.g.f.: x*(1 + 341*x + 4499*x^2 + 8983*x^3)/(1 - x)^5.
a(n) = -1899*n + 3916*n^2 - 2592*n^3 + 576*n^4.
a(n) = [x^n] (x + 341*x^2 + 4499*x^3 + 8983*x^4) / (1 - x)^5.
MAPLE
a := n -> -1899*n + 3916*n^2 - 2592*n^3 + 576*n^4: seq(a(n), n=0..27);
MATHEMATICA
Table[-1899 n + 3916 n^2 - 2592 n^3 + 576 n^4, {n, 0, 30}] (* Bruno Berselli, Jun 06 2017 *)
LinearRecurrence[{5, -10, 10, -5, 1}, {0, 1, 346, 6219, 36628}, 30] (* Vincenzo Librandi, Jul 20 2017 *)
PROG
(Magma) [-1899*n + 3916*n^2 - 2592*n^3 + 576*n^4: n in [0..30]]; // Vincenzo Librandi, Jul 20 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Peter Luschny, May 31 2017
STATUS
approved