OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
FORMULA
G.f.: x*(7-12*x+x^2+2*x^3-2*x^4)/(1-7*x+9*x^2+x^3-4*x^4+2*x^5). - Vladeta Jovovic, Jul 02 2003
MATHEMATICA
Rest[CoefficientList[Series[x*(7-12*x+x^2+2*x^3-2*x^4)/(1-7*x+9*x^2+x^3-4*x^4 +2*x^5), {x, 0, 50}], x]] (* G. C. Greubel, Apr 22 2018 *)
PROG
(PARI) x='x+O('x^30); Vec(x*(7-12*x+x^2+2*x^3-2*x^4)/(1 -7*x+9*x^2 +x^3- 4*x^4+2*x^5)) \\ G. C. Greubel, Apr 22 2018
(Magma) m:=25; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(x*(7-12*x+x^2+2*x^3-2*x^4)/(1-7*x+9*x^2+x^3-4*x^4+2*x^5))); // G. C. Greubel, Apr 22 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
R. H. Hardin, Mar 22 2002
STATUS
approved