html, body, form { margin: 0; padding: 0; width: 100%; } #calculate { position: relative; width: 177px; height: 110px; background: transparent url(/images/alphabox/embed_functions_inside.gif) no-repeat scroll 0 0; } #i { position: relative; left: 18px; top: 44px; width: 133px; border: 0 none; outline: 0; font-size: 11px; } #eq { width: 9px; height: 10px; background: transparent; position: absolute; top: 47px; right: 18px; cursor: pointer; }

 HypergeometricPFQ

 http://functions.wolfram.com/07.31.03.0010.01

 Input Form

 HypergeometricPFQ[{Subscript[a, 1], \[Ellipsis], Subscript[a, p]}, {Subscript[a, 1] + Subscript[m, 1], \[Ellipsis], Subscript[a, n] + Subscript[m, n], Subscript[b, n + 1], \[Ellipsis], Subscript[b, q]}, z] == Product[(Pochhammer[Subscript[a, j], Subscript[m, j]]/ (Subscript[m, j] - 1)!) Sum[\[Ellipsis] Sum[(1/(Subscript[a, k] + Subscript[j, k])) Product[(Pochhammer[1 - Subscript[m, l], Subscript[j, l]]/ Subscript[j, l]!) Product[If[i == k, 1, 1/(Subscript[a, i] + Subscript[j, i] - Subscript[a, k] - Subscript[j, k])] HypergeometricPFQ[{Subscript[a, k] + Subscript[j, k], Subscript[a, n + 1], \[Ellipsis], Subscript[a, p]}, {Subscript[a, k] + Subscript[j, k] + 1, Subscript[b, n + 1], \[Ellipsis], Subscript[b, q]}, z], {i, 1, n}], {l, 1, n}], {Subscript[j, n], 0, Subscript[m, n] - 1}], {k, 1, n}, {Subscript[j, 1], 0, Subscript[m, 1] - 1}], {j, 1, n}] /; Element[Subscript[m, n], Integers] && Subscript[m, n] > 0 && n <= q

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List[RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List[SubscriptBox["a", "1"], ",", "\[Ellipsis]", ",", SubscriptBox["a", "p"]]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List[SubscriptBox["a", "1"], "+", SubscriptBox["m", "1"]]], ",", "\[Ellipsis]", ",", RowBox[List[SubscriptBox["a", "n"], "+", SubscriptBox["m", "n"]]], ",", SubscriptBox["b", RowBox[List["n", "+", "1"]]], ",", "\[Ellipsis]", ",", SubscriptBox["b", "q"]]], "}"]], ",", "z"]], "]"]], "\[Equal]", RowBox[List[UnderoverscriptBox["\[Product]", RowBox[List["j", "=", "1"]], "n"], RowBox[List[FractionBox[RowBox[List["Pochhammer", "[", RowBox[List[SubscriptBox["a", "j"], ",", SubscriptBox["m", "j"]]], "]"]], RowBox[List[RowBox[List["(", RowBox[List[SubscriptBox["m", "j"], "-", "1"]], ")"]], "!"]]], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "1"]], "n"], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List[SubscriptBox["j", "1"], "=", "0"]], RowBox[List[SubscriptBox["m", "1"], "-", "1"]]], RowBox[List["\[Ellipsis]", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List[SubscriptBox["j", "n"], "=", "0"]], RowBox[List[SubscriptBox["m", "n"], "-", "1"]]], RowBox[List[FractionBox["1", RowBox[List[SubscriptBox["a", "k"], "+", SubscriptBox["j", "k"]]]], RowBox[List[UnderoverscriptBox["\[Product]", RowBox[List["l", "=", "1"]], "n"], RowBox[List[FractionBox[RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["1", "-", SubscriptBox["m", "l"]]], ",", SubscriptBox["j", "l"]]], "]"]], RowBox[List[SubscriptBox["j", "l"], "!"]]], RowBox[List[UnderoverscriptBox["\[Product]", RowBox[List["i", "=", "1"]], "n"], RowBox[List[RowBox[List["If", "[", RowBox[List[RowBox[List["i", "\[Equal]", "k"]], ",", "1", ",", FractionBox["1", RowBox[List[SubscriptBox["a", "i"], "+", SubscriptBox["j", "i"], "-", SubscriptBox["a", "k"], "-", SubscriptBox["j", "k"]]]]]], "]"]], RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List[RowBox[List[SubscriptBox["a", "k"], "+", SubscriptBox["j", "k"]]], ",", SubscriptBox["a", RowBox[List["n", "+", "1"]]], ",", "\[Ellipsis]", ",", SubscriptBox["a", "p"]]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List[SubscriptBox["a", "k"], "+", SubscriptBox["j", "k"], "+", "1"]], ",", SubscriptBox["b", RowBox[List["n", "+", "1"]]], ",", "\[Ellipsis]", ",", SubscriptBox["b", "q"]]], "}"]], ",", "z"]], "]"]]]]]]]]]]]]]]]]]]]]]]]]]], "/;", RowBox[List[RowBox[List[SubscriptBox["m", "n"], "\[Element]", "Integers"]], "\[And]", RowBox[List[SubscriptBox["m", "n"], ">", "0"]], "\[And]", RowBox[List["n", "\[LessEqual]", "q"]]]]]]]]

 MathML Form

 p F q ( a 1 , , a p TagBox[TagBox[TagBox[TagBox[RowBox[List[SubscriptBox["a", "1"], ",", "\[Ellipsis]", ",", SubscriptBox["a", "p"]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]] ; a 1 + m 1 , , a n + m n , b n + 1 , , b q TagBox[TagBox[TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["a", "1"], "+", SubscriptBox["m", "1"]]], ",", "\[Ellipsis]", ",", RowBox[List[SubscriptBox["a", "n"], "+", SubscriptBox["m", "n"]]], ",", SubscriptBox["b", RowBox[List["n", "+", "1"]]], ",", "\[Ellipsis]", ",", SubscriptBox["b", "q"]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]] ; z TagBox["z", HypergeometricPFQ, Rule[Editable, True]] ) j = 1 n ( a j ) m j TagBox[SubscriptBox[RowBox[List["(", SubscriptBox["a", "j"], ")"]], SubscriptBox["m", "j"]], Pochhammer] ( m j - 1 ) ! k = 1 n j 1 = 0 m 1 - 1 j n = 0 m n - 1 1 a k + j k l = 1 n ( 1 - m l ) j l TagBox[SubscriptBox[RowBox[List["(", RowBox[List["1", "-", SubscriptBox["m", "l"]]], ")"]], SubscriptBox["j", "l"]], Pochhammer] j l ! i = 1 i k n 1 a i + j i - a k - j k p - n + 1 F q - n + 1 ( a k + j k , a n + 1 , , a p TagBox[TagBox[TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["a", "k"], "+", SubscriptBox["j", "k"]]], ",", SubscriptBox["a", RowBox[List["n", "+", "1"]]], ",", "\[Ellipsis]", ",", SubscriptBox["a", "p"]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]] ; a k + j k + 1 , b n + 1 , , b q TagBox[TagBox[TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["a", "k"], "+", SubscriptBox["j", "k"], "+", "1"]], ",", SubscriptBox["b", RowBox[List["n", "+", "1"]]], ",", "\[Ellipsis]", ",", SubscriptBox["b", "q"]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, True]] ; z TagBox["z", HypergeometricPFQ, Rule[Editable, True]] ) FormBox RowBox RowBox RowBox SubscriptBox ErrorBox FormBox p TraditionalForm SubscriptBox F q RowBox ( RowBox TagBox TagBox TagBox TagBox RowBox SubscriptBox a 1 , , SubscriptBox a p InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable ; TagBox TagBox TagBox TagBox RowBox RowBox SubscriptBox a 1 + SubscriptBox m 1 , , RowBox SubscriptBox a n + SubscriptBox m n , SubscriptBox b RowBox n + 1 , , SubscriptBox b q InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable ; TagBox z HypergeometricPFQ Rule Editable ) RowBox UnderoverscriptBox RowBox j = 1 n RowBox FractionBox TagBox SubscriptBox RowBox ( SubscriptBox a j ) SubscriptBox m j Pochhammer RowBox RowBox ( RowBox SubscriptBox m j - 1 ) ! RowBox UnderoverscriptBox RowBox k = 1 n RowBox UnderoverscriptBox RowBox SubscriptBox j 1 = 0 RowBox SubscriptBox m 1 - 1 RowBox RowBox UnderoverscriptBox RowBox SubscriptBox j n = 0 RowBox SubscriptBox m n - 1 RowBox FractionBox 1 RowBox SubscriptBox a k + SubscriptBox j k RowBox UnderoverscriptBox RowBox l = 1 n RowBox FractionBox TagBox SubscriptBox RowBox ( RowBox 1 - SubscriptBox m l ) SubscriptBox j l Pochhammer RowBox SubscriptBox j l ! RowBox UnderoverscriptBox UnderscriptBox RowBox i = 1 RowBox i k n RowBox FractionBox 1 RowBox SubscriptBox a i + SubscriptBox j i - SubscriptBox a k - SubscriptBox j k RowBox RowBox SubscriptBox FormBox RowBox p - n + 1 TraditionalForm SubscriptBox F RowBox q - n + 1 RowBox ( RowBox TagBox TagBox TagBox TagBox RowBox RowBox SubscriptBox a k + SubscriptBox j k , SubscriptBox a RowBox n + 1 , , SubscriptBox a p InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable ; TagBox TagBox TagBox TagBox RowBox RowBox SubscriptBox a k + SubscriptBox j k + 1 , SubscriptBox b RowBox n + 1 , , SubscriptBox b q InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable InterpretTemplate Function SlotSequence 1 HypergeometricPFQ Rule Editable ; TagBox z HypergeometricPFQ Rule Editable ) TraditionalForm [/itex]

 Date Added to functions.wolfram.com (modification date)

 2001-10-29