OFFSET
1,2
COMMENTS
Weighted solution of the following zero sum game:
Ma={{0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0},
{0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, a}}; a={1,2};
ML={{0, 1, 0, 0, 0, 0}, {0, 0, 1, 0, 0, 0},
{0, 0, 0, 1, 0, 0}, {0, 0, 0, 0, 1, 0},
{0, 0, 0, 0, 0, 1}, {21, 0, 0, 0, 0, 46}};
such that 4*Game_value[M1]+Game_value[M2]+Game_Value[ML]=0
FORMULA
G.f.: x/((-1 + x + x^6)^4*(-1 + 2*x + x^6)*(-1 + 46*x + 21*x^6)). - Georg Fischer, Feb 17 2020
MATHEMATICA
f[x_] = (-1 - x^5 + x^6)^4*(-1 - 2*x^5 + x^6)*(-21 - 46 x^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}] (* or *)
Rest[CoefficientList[Series[x/((-1 + x + x^6)^4*(-1 + 2*x + x^6)*(-1 + 46*x
+ 21 *x^6)), {x, 0 , 14}], x]] // Flatten (* Georg Fischer, Feb 17 2020 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Jan 31 2008
STATUS
approved