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; }

 LegendreQ

 http://functions.wolfram.com/07.12.03.0030.01

 Input Form

 LegendreQ[n, m, 3, z] == 2^(-1 - n) (n + m)! n! (z - 1)^(Abs[m]/2) (z + 1)^(n - Abs[m]/2) (Sum[(((-1)^(-k + Abs[m]) (Abs[m] - k - 1)!)/(k! (n - k)! (Abs[m] + n - k)!)) ((z - 1)/(z + 1))^(k - Abs[m]), {k, 0, Abs[m] - 1}] + Sum[(1/(k! (k + Abs[m])! (n - k)! (n - Abs[m] - k)!)) (PolyGamma[1 + k] + PolyGamma[1 + k + Abs[m]] - PolyGamma[n - k + 1] - PolyGamma[n - Abs[m] - k + 1] + Log[z + 1] - Log[z - 1]) ((z - 1)/(z + 1))^k, {k, 0, n - Abs[m]}] + Sum[(((-1)^(n - k + Abs[m] - 1) (k + Abs[m] - n - 1)!)/ (k! (k + Abs[m])! (n - k)!)) ((z - 1)/(z + 1))^k, {k, n - Abs[m] + 1, n}]) /; Element[n, Integers] && n >= 0 && Element[m, Integers] && Abs[m] <= n

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List[RowBox[List["LegendreQ", "[", RowBox[List["n", ",", "m", ",", "3", ",", "z"]], "]"]], "\[Equal]", RowBox[List[SuperscriptBox["2", RowBox[List[RowBox[List["-", "1"]], "-", "n"]]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "+", "m"]], ")"]], "!"]], RowBox[List["n", "!"]], SuperscriptBox[RowBox[List["(", RowBox[List["z", "-", "1"]], ")"]], RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "/", "2"]]], SuperscriptBox[RowBox[List["(", RowBox[List["z", "+", "1"]], ")"]], RowBox[List["n", "-", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "/", "2"]]]]], RowBox[List["(", RowBox[List[RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "-", "1"]]], RowBox[List[FractionBox[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List[RowBox[List["-", "k"]], "+", RowBox[List["Abs", "[", "m", "]"]]]]], RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "-", "k", "-", "1"]], ")"]], "!"]]]], RowBox[List[" ", RowBox[List[RowBox[List["k", "!"]], RowBox[List[RowBox[List["(", RowBox[List["n", "-", "k"]], ")"]], "!"]], RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "+", "n", "-", "k"]], ")"]], "!"]]]]]]], " ", SuperscriptBox[RowBox[List["(", FractionBox[RowBox[List["z", "-", "1"]], RowBox[List["z", "+", "1"]]], ")"]], RowBox[List["k", "-", RowBox[List["Abs", "[", "m", "]"]]]]]]]]], " ", "+", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]]]]], RowBox[List[FractionBox["1", RowBox[List[RowBox[List["k", "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["k", "+", RowBox[List["Abs", "[", "m", "]"]]]], ")"]], "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "-", "k"]], ")"]], "!"]], RowBox[List[RowBox[List["(", RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]], "-", "k"]], ")"]], "!"]]]]], RowBox[List["(", RowBox[List[RowBox[List["PolyGamma", "[", RowBox[List["1", "+", "k"]], "]"]], "+", RowBox[List["PolyGamma", "[", RowBox[List["1", "+", "k", "+", RowBox[List["Abs", "[", "m", "]"]]]], "]"]], "-", RowBox[List["PolyGamma", "[", RowBox[List["n", "-", "k", "+", "1"]], "]"]], "-", RowBox[List["PolyGamma", "[", RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]], "-", "k", "+", "1"]], "]"]], "+", RowBox[List["Log", "[", RowBox[List["z", "+", "1"]], "]"]], "-", RowBox[List["Log", "[", RowBox[List["z", "-", "1"]], "]"]]]], ")"]], SuperscriptBox[RowBox[List["(", FractionBox[RowBox[List["z", "-", "1"]], RowBox[List["z", "+", "1"]]], ")"]], "k"]]]]], "+", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]], "+", "1"]]]], "n"], RowBox[List[FractionBox[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["n", "-", "k", "+", RowBox[List["Abs", "[", "m", "]"]], "-", "1"]]], RowBox[List[RowBox[List["(", RowBox[List["k", "+", RowBox[List["Abs", "[", "m", "]"]], "-", "n", "-", "1"]], ")"]], "!"]], " "]], RowBox[List[RowBox[List["k", "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["k", "+", RowBox[List["Abs", "[", "m", "]"]]]], ")"]], "!"]], RowBox[List[RowBox[List["(", RowBox[List["n", "-", "k"]], ")"]], "!"]]]]], SuperscriptBox[RowBox[List["(", FractionBox[RowBox[List["z", "-", "1"]], RowBox[List["z", "+", "1"]]], ")"]], "k"]]]]]]], ")"]]]]]], "/;", RowBox[List[RowBox[List["n", "\[Element]", "Integers"]], "\[And]", RowBox[List["n", "\[GreaterEqual]", "0"]], "\[And]", RowBox[List["m", "\[Element]", "Integers"]], "\[And]", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "\[LessEqual]", "n"]]]]]]]]

 MathML Form

 𝔔 TagBox["\[GothicCapitalQ]", LegendreQ] n m ( z TagBox["z", HoldComplete[LegendreQ, 3]] ) 2 - n - 1 ( m + n ) ! n ! ( z - 1 ) "\[LeftBracketingBar]" m "\[RightBracketingBar]" / 2 ( z + 1 ) n - "\[LeftBracketingBar]" m "\[RightBracketingBar]" / 2 ( k = 0 Abs [ m ] - 1 ( - 1 ) "\[LeftBracketingBar]" m "\[RightBracketingBar]" - k ( "\[LeftBracketingBar]" m "\[RightBracketingBar]" - k - 1 ) ! k ! ( n - k ) ! ( "\[LeftBracketingBar]" m "\[RightBracketingBar]" + n - k ) ! ( z - 1 z + 1 ) k - "\[LeftBracketingBar]" m "\[RightBracketingBar]" + k = 0 n - "\[LeftBracketingBar]" m "\[RightBracketingBar]" 1 k ! ( k + "\[LeftBracketingBar]" m "\[RightBracketingBar]" ) ! ( n - k ) ! ( n - "\[LeftBracketingBar]" m "\[RightBracketingBar]" - k ) ! ( ψ TagBox["\[Psi]", PolyGamma] ( k + 1 ) + ψ TagBox["\[Psi]", PolyGamma] ( k + "\[LeftBracketingBar]" m "\[RightBracketingBar]" + 1 ) - ψ TagBox["\[Psi]", PolyGamma] ( n - k + 1 ) - ψ TagBox["\[Psi]", PolyGamma] ( n - "\[LeftBracketingBar]" m "\[RightBracketingBar]" - k + 1 ) + log ( z + 1 ) - log ( z - 1 ) ) ( z - 1 z + 1 ) k + k = n - "\[LeftBracketingBar]" m "\[RightBracketingBar]" + 1 n ( - 1 ) n - k + "\[LeftBracketingBar]" m "\[RightBracketingBar]" - 1 ( k + "\[LeftBracketingBar]" m "\[RightBracketingBar]" - n - 1 ) ! k ! ( k + "\[LeftBracketingBar]" m "\[RightBracketingBar]" ) ! ( n - k ) ! ( z - 1 z + 1 ) k ) /; n m TagBox["\[DoubleStruckCapitalZ]", Function[Integers]] "\[LeftBracketingBar]" m "\[RightBracketingBar]" n Condition Subscript LegendreQ 𝔔 n m HoldComplete LegendreQ 3 z 2 -1 n -1 m n n z -1 m 2 -1 z 1 n -1 m 2 -1 k 0 m -1 -1 m -1 k m -1 k -1 k n -1 k m n -1 k -1 z -1 z 1 -1 k -1 m k 0 n -1 m 1 k k m n -1 k n -1 m -1 k -1 PolyGamma k 1 PolyGamma k m 1 -1 PolyGamma n -1 k 1 -1 PolyGamma n -1 m -1 k 1 z 1 -1 z -1 z -1 z 1 -1 k k n -1 m 1 n -1 n -1 k m -1 k m -1 n -1 k k m n -1 k -1 z -1 z 1 -1 k n m m n [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["LegendreQ", "[", RowBox[List["n_", ",", "m_", ",", "3", ",", "z_"]], "]"]], "]"]], "\[RuleDelayed]", RowBox[List[RowBox[List[SuperscriptBox["2", RowBox[List[RowBox[List["-", "1"]], "-", "n"]]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "+", "m"]], ")"]], "!"]], " ", RowBox[List["n", "!"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List["z", "-", "1"]], ")"]], FractionBox[RowBox[List["Abs", "[", "m", "]"]], "2"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List["z", "+", "1"]], ")"]], RowBox[List["n", "-", FractionBox[RowBox[List["Abs", "[", "m", "]"]], "2"]]]], " ", RowBox[List["(", RowBox[List[RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "-", "1"]]], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List[RowBox[List["-", "k"]], "+", RowBox[List["Abs", "[", "m", "]"]]]]], " ", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "-", "k", "-", "1"]], ")"]], "!"]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", FractionBox[RowBox[List["z", "-", "1"]], RowBox[List["z", "+", "1"]]], ")"]], RowBox[List["k", "-", RowBox[List["Abs", "[", "m", "]"]]]]]]], RowBox[List[RowBox[List["k", "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "-", "k"]], ")"]], "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "+", "n", "-", "k"]], ")"]], "!"]]]]]]], "+", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]]]]], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["PolyGamma", "[", RowBox[List["1", "+", "k"]], "]"]], "+", RowBox[List["PolyGamma", "[", RowBox[List["1", "+", "k", "+", RowBox[List["Abs", "[", "m", "]"]]]], "]"]], "-", RowBox[List["PolyGamma", "[", RowBox[List["n", "-", "k", "+", "1"]], "]"]], "-", RowBox[List["PolyGamma", "[", RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]], "-", "k", "+", "1"]], "]"]], "+", RowBox[List["Log", "[", RowBox[List["z", "+", "1"]], "]"]], "-", RowBox[List["Log", "[", RowBox[List["z", "-", "1"]], "]"]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", FractionBox[RowBox[List["z", "-", "1"]], RowBox[List["z", "+", "1"]]], ")"]], "k"]]], RowBox[List[RowBox[List["k", "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["k", "+", RowBox[List["Abs", "[", "m", "]"]]]], ")"]], "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "-", "k"]], ")"]], "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]], "-", "k"]], ")"]], "!"]]]]]]], "+", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", RowBox[List["n", "-", RowBox[List["Abs", "[", "m", "]"]], "+", "1"]]]], "n"], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["n", "-", "k", "+", RowBox[List["Abs", "[", "m", "]"]], "-", "1"]]], " ", RowBox[List[RowBox[List["(", RowBox[List["k", "+", RowBox[List["Abs", "[", "m", "]"]], "-", "n", "-", "1"]], ")"]], "!"]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", FractionBox[RowBox[List["z", "-", "1"]], RowBox[List["z", "+", "1"]]], ")"]], "k"]]], RowBox[List[RowBox[List["k", "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["k", "+", RowBox[List["Abs", "[", "m", "]"]]]], ")"]], "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["n", "-", "k"]], ")"]], "!"]]]]]]]]], ")"]]]], "/;", RowBox[List[RowBox[List["n", "\[Element]", "Integers"]], "&&", RowBox[List["n", "\[GreaterEqual]", "0"]], "&&", RowBox[List["m", "\[Element]", "Integers"]], "&&", RowBox[List[RowBox[List["Abs", "[", "m", "]"]], "\[LessEqual]", "n"]]]]]]]]]]

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

 2001-10-29