|
|
|
|
0, 1, 10, 64, 328, 1462, 5908, 22180, 78592, 265729, 864146, 2719028, 8316200, 24814832, 72453344, 207502016, 584094080, 1618757120, 4423347200, 11932579840, 31812874240, 83901227008, 219074805760, 566754967552
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
G.f.: x*(1-x)^8/(1-2*x)^9.
|
|
MAPLE
|
seq(coeff(series(x*(1-x)^8/(1-2*x)^9, x, n+1), x, n), n = 0..30); # G. C. Greubel, Jan 16 2020
|
|
MATHEMATICA
|
CoefficientList[Series[x*(1-x)^8/(1-2*x)^9, {x, 0, 30}], x] (* G. C. Greubel, Jan 16 2020 *)
|
|
PROG
|
(PARI) my(x='x+O('x^30)); concat([0], Vec(x*(1-x)^8/(1-2*x)^9)) \\ G. C. Greubel, Jan 16 2020
(Magma) R<x>:=PowerSeriesRing(Integers(), 30); [0] cat Coefficients(R!( x*(1-x)^8/(1-2*x)^9 )); // G. C. Greubel, Jan 16 2020
(Sage)
P.<x> = PowerSeriesRing(ZZ, prec)
return P( x*(1-x)^8/(1-2*x)^9 ).list()
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|