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.25.03.ak1j.01

 Input Form

 HypergeometricPFQ[{3, 7/2}, {-(9/2), -(7/2)}, z] == (1/1488375) (1488375 + 992250 z + 1020600 z^2 + 2494800 z^3 + 32432400 z^4 - 1362160800 z^5 - 12532665600 z^6 - 22350343680 z^7 - 15534408960 z^8 - 5283540480 z^9 - 972871680 z^10 - 100823040 z^11 - 5820416 z^12 - 173056 z^13 - 2048 z^14) - (1/1488375) (512 E^z Sqrt[Pi] (7862400 z^(11/2) + 38404800 z^(13/2) + 55339200 z^(15/2) + 34750800 z^(17/2) + 11183760 z^(19/2) + 1993320 z^(21/2) + 202440 z^(23/2) + 11535 z^(25/2) + 340 z^(27/2) + 4 z^(29/2)) Erf[Sqrt[z]])

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List["3", ",", FractionBox["7", "2"]]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List["-", FractionBox["9", "2"]]], ",", RowBox[List["-", FractionBox["7", "2"]]]]], "}"]], ",", "z"]], "]"]], "\[Equal]", RowBox[List[RowBox[List[FractionBox["1", "1488375"], RowBox[List["(", RowBox[List["1488375", "+", RowBox[List["992250", " ", "z"]], "+", RowBox[List["1020600", " ", SuperscriptBox["z", "2"]]], "+", RowBox[List["2494800", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["32432400", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["1362160800", " ", SuperscriptBox["z", "5"]]], "-", RowBox[List["12532665600", " ", SuperscriptBox["z", "6"]]], "-", RowBox[List["22350343680", " ", SuperscriptBox["z", "7"]]], "-", RowBox[List["15534408960", " ", SuperscriptBox["z", "8"]]], "-", RowBox[List["5283540480", " ", SuperscriptBox["z", "9"]]], "-", RowBox[List["972871680", " ", SuperscriptBox["z", "10"]]], "-", RowBox[List["100823040", " ", SuperscriptBox["z", "11"]]], "-", RowBox[List["5820416", " ", SuperscriptBox["z", "12"]]], "-", RowBox[List["173056", " ", SuperscriptBox["z", "13"]]], "-", RowBox[List["2048", " ", SuperscriptBox["z", "14"]]]]], ")"]]]], "-", RowBox[List[FractionBox["1", "1488375"], RowBox[List["(", RowBox[List["512", " ", SuperscriptBox["\[ExponentialE]", "z"], " ", SqrtBox["\[Pi]"], " ", RowBox[List["(", RowBox[List[RowBox[List["7862400", " ", SuperscriptBox["z", RowBox[List["11", "/", "2"]]]]], "+", RowBox[List["38404800", " ", SuperscriptBox["z", RowBox[List["13", "/", "2"]]]]], "+", RowBox[List["55339200", " ", SuperscriptBox["z", RowBox[List["15", "/", "2"]]]]], "+", RowBox[List["34750800", " ", SuperscriptBox["z", RowBox[List["17", "/", "2"]]]]], "+", RowBox[List["11183760", " ", SuperscriptBox["z", RowBox[List["19", "/", "2"]]]]], "+", RowBox[List["1993320", " ", SuperscriptBox["z", RowBox[List["21", "/", "2"]]]]], "+", RowBox[List["202440", " ", SuperscriptBox["z", RowBox[List["23", "/", "2"]]]]], "+", RowBox[List["11535", " ", SuperscriptBox["z", RowBox[List["25", "/", "2"]]]]], "+", RowBox[List["340", " ", SuperscriptBox["z", RowBox[List["27", "/", "2"]]]]], "+", RowBox[List["4", " ", SuperscriptBox["z", RowBox[List["29", "/", "2"]]]]]]], ")"]], " ", RowBox[List["Erf", "[", SqrtBox["z"], "]"]]]], ")"]]]]]]]]]]

 MathML Form

 2 F 2 ( 3 , 7 2 ; - 9 2 , - 7 2 ; z ) TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["\[InvisiblePrefixScriptBase]", "2"], SubscriptBox["F", "2"]]], "\[InvisibleApplication]", RowBox[List["(", RowBox[List[TagBox[TagBox[RowBox[List[TagBox["3", HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]], ",", TagBox[FractionBox["7", "2"], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, False], Rule[Selectable, False]], ";", TagBox[TagBox[RowBox[List[TagBox[RowBox[List["-", FractionBox["9", "2"]]], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]], ",", TagBox[RowBox[List["-", FractionBox["7", "2"]]], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, False], Rule[Selectable, False]], ";", TagBox["z", HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], ")"]]]], InterpretTemplate[Function[HypergeometricPFQ[Slot[1], Slot[2], Slot[3]]]], Rule[Editable, False], Rule[Selectable, False]], HypergeometricPFQ] 1 1488375 ( - 2048 z 14 - 173056 z 13 - 5820416 z 12 - 100823040 z 11 - 972871680 z 10 - 5283540480 z 9 - 15534408960 z 8 - 22350343680 z 7 - 12532665600 z 6 - 1362160800 z 5 + 32432400 z 4 + 2494800 z 3 + 1020600 z 2 + 992250 z + 1488375 ) - 1 1488375 ( 512 z π ( 4 z 29 / 2 + 340 z 27 / 2 + 11535 z 25 / 2 + 202440 z 23 / 2 + 1993320 z 21 / 2 + 11183760 z 19 / 2 + 34750800 z 17 / 2 + 55339200 z 15 / 2 + 38404800 z 13 / 2 + 7862400 z 11 / 2 ) erf ( z ) ) HypergeometricPFQ 3 7 2 -1 9 2 -1 7 2 z 1 1488375 -2048 z 14 -1 173056 z 13 -1 5820416 z 12 -1 100823040 z 11 -1 972871680 z 10 -1 5283540480 z 9 -1 15534408960 z 8 -1 22350343680 z 7 -1 12532665600 z 6 -1 1362160800 z 5 32432400 z 4 2494800 z 3 1020600 z 2 992250 z 1488375 -1 1 1488375 512 z 1 2 4 z 29 2 340 z 27 2 11535 z 25 2 202440 z 23 2 1993320 z 21 2 11183760 z 19 2 34750800 z 17 2 55339200 z 15 2 38404800 z 13 2 7862400 z 11 2 Erf z 1 2 [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List["3", ",", FractionBox["7", "2"]]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List["-", FractionBox["9", "2"]]], ",", RowBox[List["-", FractionBox["7", "2"]]]]], "}"]], ",", "z_"]], "]"]], "]"]], "\[RuleDelayed]", RowBox[List[FractionBox[RowBox[List["1488375", "+", RowBox[List["992250", " ", "z"]], "+", RowBox[List["1020600", " ", SuperscriptBox["z", "2"]]], "+", RowBox[List["2494800", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["32432400", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["1362160800", " ", SuperscriptBox["z", "5"]]], "-", RowBox[List["12532665600", " ", SuperscriptBox["z", "6"]]], "-", RowBox[List["22350343680", " ", SuperscriptBox["z", "7"]]], "-", RowBox[List["15534408960", " ", SuperscriptBox["z", "8"]]], "-", RowBox[List["5283540480", " ", SuperscriptBox["z", "9"]]], "-", RowBox[List["972871680", " ", SuperscriptBox["z", "10"]]], "-", RowBox[List["100823040", " ", SuperscriptBox["z", "11"]]], "-", RowBox[List["5820416", " ", SuperscriptBox["z", "12"]]], "-", RowBox[List["173056", " ", SuperscriptBox["z", "13"]]], "-", RowBox[List["2048", " ", SuperscriptBox["z", "14"]]]]], "1488375"], "-", FractionBox[RowBox[List["512", " ", SuperscriptBox["\[ExponentialE]", "z"], " ", SqrtBox["\[Pi]"], " ", RowBox[List["(", RowBox[List[RowBox[List["7862400", " ", SuperscriptBox["z", RowBox[List["11", "/", "2"]]]]], "+", RowBox[List["38404800", " ", SuperscriptBox["z", RowBox[List["13", "/", "2"]]]]], "+", RowBox[List["55339200", " ", SuperscriptBox["z", RowBox[List["15", "/", "2"]]]]], "+", RowBox[List["34750800", " ", SuperscriptBox["z", RowBox[List["17", "/", "2"]]]]], "+", RowBox[List["11183760", " ", SuperscriptBox["z", RowBox[List["19", "/", "2"]]]]], "+", RowBox[List["1993320", " ", SuperscriptBox["z", RowBox[List["21", "/", "2"]]]]], "+", RowBox[List["202440", " ", SuperscriptBox["z", RowBox[List["23", "/", "2"]]]]], "+", RowBox[List["11535", " ", SuperscriptBox["z", RowBox[List["25", "/", "2"]]]]], "+", RowBox[List["340", " ", SuperscriptBox["z", RowBox[List["27", "/", "2"]]]]], "+", RowBox[List["4", " ", SuperscriptBox["z", RowBox[List["29", "/", "2"]]]]]]], ")"]], " ", RowBox[List["Erf", "[", SqrtBox["z"], "]"]]]], "1488375"]]]]]]]

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

 2007-05-02