login
A158375
Let p(x) = 1063*x + 867*x^2 + 676*x^3 + 322*x^4 + 124*x^5 + 36*x^6 + 7*x^7 + x^8, expansion of the reciprocal polynomial of p(x).
0
1, -7, 13, 37, -181, -99, 2300, -5788, -568, 35480, -66280, -155716, 1283293, -3625851, 2493973, 18732949, -59514957, -61554751, 951463080, -3002878824, 2592617664, 13134072768, -45989528256, -32014204536, 686734832905
OFFSET
0,2
MATHEMATICA
f[x_] = 1063 x + 867 x^2 + 676 x^3 + 322 x^4 + 124 x^5 + 36 x^6 + 7 x^7 + x^8;
g[x] = ExpandAll[x^8*f[1/x]];
a = Table[SeriesCoefficient[Series[1/g[x], {x, 0, n}], n], {n, 0, 25}]
CROSSREFS
Sequence in context: A052378 A090607 A201597 * A144729 A123250 A062591
KEYWORD
sign,easy,less
AUTHOR
Roger L. Bagula, Mar 17 2009
STATUS
approved