OFFSET
0,4
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (1,4,6,4,1).
FORMULA
G.f.: x*(9*x^3 + 3*x^2 - 1)/((x^2 + x + 1)*(x^3 + 3*x^2 + 2*x - 1)). [Maksym Voznyy (voznyy(AT)mail.ru), Aug 12 2009]
MATHEMATICA
LinearRecurrence[{1, 4, 6, 4, 1}, {0, 1, 1, 2, 3}, 30] (* Harvey P. Dale, Oct 13 2011 *)
PROG
(PARI) x='x+O('x^50); concat([0], Vec(x*(9*x^3+3*x^2-1)/((x^2+x+1)*(x^3+ 3*x^2+2*x-1)))) \\ G. C. Greubel, Nov 03 2018
(Magma) m:=50; R<x>:=PowerSeriesRing(Integers(), m); [0] cat Coefficients(R!(x*(9*x^3+3*x^2-1)/((x^2+x+1)*(x^3+ 3*x^2+2*x-1)))); // G. C. Greubel, Nov 03 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Feb 18 2006
STATUS
approved