OFFSET
0,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (5,-10,10,-5,1).
FORMULA
a(n) = A219069(n,n) for n > 0;
From Chai Wah Wu, Jun 22 2016: (Start)
a(n) = 5*a(n-1) - 10*a(n-2) + 10*a(n-3) - 5*a(n-4) + a(n-5) for n > 4.
G.f.: 3*x*(1 + x)*(1 + 10*x + x^2)/(1 - x)^5. (End)
E.g.f.: 3*x*(1 + 7*x + 6*x^2 + x^3)*exp(x). - G. C. Greubel, Jun 22 2016
MATHEMATICA
LinearRecurrence[{5, -10, 10, -5, 1}, {0, 3, 48, 243, 768}, 100] (* or *) Table[3*n^4, {n, 0, 50}] (* _G. Greubel_, Jun 22 2016 *)
PROG
(Haskell)
a219056 = (* 3) . (^ 4)
(Maxima) makelist(3*n^4, n, 0, 30); /* Martin Ettl, Nov 12 2012 */
(PARI) a(n) = 3*n^4; \\ Michel Marcus, Jan 26 2022
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Reinhard Zumkeller, Nov 11 2012
STATUS
approved