Cell[BoxData[RowBox[List[RowBox[List[RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List[SubscriptBox["j", "1"], "=", "0"]], SubscriptBox["k", "1"]], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List[SubscriptBox["j", "2"], "=", "0"]], SubscriptBox["k", "2"]], RowBox[List["\[Ellipsis]", RowBox[List[UnderoverscriptBox["\[Sum]", SubscriptBox["j", RowBox[List["n", "=", "0"]]], SubscriptBox["k", "n"]], RowBox[List[RowBox[List["Multinomial", "[", RowBox[List[RowBox[List["p", "-", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["h", "=", "1"]], "n"], SubscriptBox["j", "n"]]]]], ",", SubscriptBox["j", "1"], ",", SubscriptBox["j", "2"], ",", "\[Ellipsis]", ",", SubscriptBox["j", "n"]]], "]"]], RowBox[List["Multinomial", "[", RowBox[List[RowBox[List["q", "+", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["h", "=", "1"]], "n"], SubscriptBox["j", "n"]]]]], ",", RowBox[List[SubscriptBox["k", "1"], "-", SubscriptBox["j", "1"]]], ",", RowBox[List[SubscriptBox["k", "2"], "-", SubscriptBox["j", "2"]]], ",", "\[Ellipsis]", ",", RowBox[List[SubscriptBox["k", "n"], "-", SubscriptBox["j", "n"]]]]], "]"]]]]]]]]]]]], "\[Equal]", " ", RowBox[List["Multinomial", "[", RowBox[List[RowBox[List["p", "+", "q"]], ",", SubscriptBox["k", "1"], ",", SubscriptBox["k", "2"], ",", "\[Ellipsis]", ",", SubscriptBox["k", "n"]]], "]"]]]], "/;", RowBox[List[RowBox[List[SubscriptBox["k", "1"], "\[Element]", "Integers"]], "\[And]", RowBox[List[SubscriptBox["k", "2"], "\[Element]", "Integers"]], "\[And]", "\[Ellipsis]", "\[And]", RowBox[List[SubscriptBox["k", "n"], "\[Element]", "Integers"]], "\[And]", RowBox[List[SubscriptBox["k", "1"], "\[GreaterEqual]", "0"]], "\[And]", RowBox[List[SubscriptBox["k", "2"], "\[GreaterEqual]", "0"]], "\[And]", "\[Ellipsis]", "\[And]", RowBox[List[SubscriptBox["k", "n"], "\[GreaterEqual]", "0"]], "\[And]", RowBox[List["p", "\[Element]", "Integers"]], "\[And]", RowBox[List["p", "\[GreaterEqual]", "0"]], "\[And]", RowBox[List["q", "\[Element]", "Integers"]], "\[And]", RowBox[List["q", "\[GreaterEqual]", "0"]], "\[And]", RowBox[List["n", "\[Element]", "Integers"]], "\[And]", RowBox[List["n", "\[GreaterEqual]", "1"]]]]]]]]
|