login
A135644
Expansion of reciprocal polynomial of (-1-x^5+x^6)^4 * (-1-2*x^5+x^6)*(-9-34*x^5+x^6).
1
1, 40, 1382, 47052, 1599931, 54398036, 1849534086, 62884161136, 2138061495013, 72694091262236, 2471599117332784, 84034370478932992, 2857168612929602684, 97143733405564093636, 3302886955031732949874, 112298157125325742290668
OFFSET
1,2
LINKS
MATHEMATICA
f[x_] = (-1 - x^5 + x^6)^4*(-1 - 2*x^5 + x^6)*(-9 - 34x^5 + x^6); g[x_] = Expand[x^36*f[1/x]]; a = Table[ SeriesCoefficient[Series[1/g[x], {x, 0, 30}], n], {n, 0, 30}]
PROG
(PARI) f(x)=((-1-x^5+x^6)^4*(-1-2*x^5+x^6)*(-9-34*x^5+x^6));
v=Vec(1/polrecip(f(x))+O(x^66))
CROSSREFS
Sequence in context: A239189 A188253 A049396 * A165371 A162877 A163223
KEYWORD
nonn,less
AUTHOR
Roger L. Bagula, Jan 31 2008
EXTENSIONS
Edited by Michel Marcus, Apr 02 2013
STATUS
approved