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

 Log

 http://functions.wolfram.com/01.05.20.0009.01

 Input Form

 D[Log[a, z], {a, \[Alpha]}] == ((UnitStep[Re[-\[Alpha]]] a^(-\[Alpha] - 1))/Gamma[-\[Alpha]]) Log[z] Sum[(Pochhammer[1 + \[Alpha], k] ExpIntegralEi[(1 + k) Log[a]])/k!/a^k, {k, 0, Infinity}] + ((UnitStep[-Re[-\[Alpha]]] a^(-\[Alpha] - 1))/ Gamma[Floor[\[Alpha]] - \[Alpha] + 1]) Log[a, z] Sum[(Pochhammer[\[Alpha] - Floor[\[Alpha]], k]/(a^k k!)) Sum[Binomial[Floor[\[Alpha]] + 1, Floor[\[Alpha]] + 1 - m] Pochhammer[m - \[Alpha] - k, Floor[\[Alpha]] + 1 - m] Sum[(1/p!) ((-1)^p p! + (1 + k) Log[a] HypergeometricPFQRegularized[ {1, 1}, {2, 1 - p}, (1 + k) Log[a]]) (Sum[Log[a]^(1 - h) StirlingS1[m, h] p! Sum[(-1)^j/(j! (p - j - h + 1)!), {j, 0, p - 1}], {h, 0, m}] + (-1)^(m + p + 1) (m - 1)!), {p, 0, m - 1}], {m, 0, Floor[\[Alpha]] + 1}], {k, 0, Infinity}]

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List[SubscriptBox["\[PartialD]", RowBox[List["{", RowBox[List["a", ",", "\[Alpha]"]], "}"]]], RowBox[List["Log", "[", RowBox[List["a", ",", "z"]], "]"]]]], "\[Equal]", RowBox[List[RowBox[List[FractionBox[RowBox[List[RowBox[List["UnitStep", "[", RowBox[List["Re", "[", RowBox[List["-", "\[Alpha]"]], "]"]], "]"]], SuperscriptBox["a", RowBox[List[RowBox[List["-", "\[Alpha]"]], "-", "1"]]], " "]], RowBox[List["Gamma", "[", RowBox[List["-", "\[Alpha]"]], "]"]]], RowBox[List["Log", "[", "z", "]"]], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], "\[Infinity]"], RowBox[List[FractionBox[RowBox[List[RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["1", "+", "\[Alpha]"]], ",", "k"]], "]"]], " ", RowBox[List["ExpIntegralEi", "[", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "k"]], ")"]], " ", RowBox[List["Log", "[", "a", "]"]]]], "]"]]]], RowBox[List["k", "!"]]], " ", SuperscriptBox["a", RowBox[List["-", "k"]]]]]]]]], "+", RowBox[List[FractionBox[RowBox[List[RowBox[List["UnitStep", "[", RowBox[List["-", RowBox[List["Re", "[", RowBox[List["-", "\[Alpha]"]], "]"]]]], "]"]], SuperscriptBox["a", RowBox[List[RowBox[List["-", "\[Alpha]"]], "-", "1"]]]]], RowBox[List["Gamma", "[", RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "-", "\[Alpha]", "+", "1"]], "]"]]], RowBox[List["Log", "[", RowBox[List["a", ",", "z"]], "]"]], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], "\[Infinity]"], RowBox[List[FractionBox[RowBox[List[RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["\[Alpha]", "-", RowBox[List["Floor", "[", "\[Alpha]", "]"]]]], ",", "k"]], "]"]], SuperscriptBox["a", RowBox[List["-", "k"]]]]], RowBox[List["k", "!"]]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["m", "=", "0"]], RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1"]]], " ", RowBox[List[RowBox[List["Binomial", "[", RowBox[List[RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1"]], ",", RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1", "-", "m"]]]], "]"]], RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["m", "-", "\[Alpha]", "-", "k"]], ",", RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1", "-", "m"]]]], "]"]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["p", "=", "0"]], RowBox[List["m", "-", "1"]]], RowBox[List[FractionBox["1", RowBox[List["p", "!"]]], RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], "p"], " ", RowBox[List["p", "!"]]]], "+", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "k"]], ")"]], " ", RowBox[List["Log", "[", "a", "]"]], " ", RowBox[List["HypergeometricPFQRegularized", "[", RowBox[List[RowBox[List["{", RowBox[List["1", ",", "1"]], "}"]], ",", RowBox[List["{", RowBox[List["2", ",", RowBox[List["1", "-", "p"]]]], "}"]], ",", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "k"]], ")"]], " ", RowBox[List["Log", "[", "a", "]"]]]]]], "]"]]]]]], ")"]], RowBox[List["(", RowBox[List[RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["h", "=", "0"]], "m"], RowBox[List[SuperscriptBox[RowBox[List["Log", "[", "a", "]"]], RowBox[List["1", "-", "h"]]], RowBox[List["StirlingS1", "[", RowBox[List["m", ",", "h"]], "]"]], RowBox[List["p", "!"]], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "0"]], RowBox[List["p", "-", "1"]]], FractionBox[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], "j"], " "]], RowBox[List[RowBox[List["j", "!"]], RowBox[List[RowBox[List["(", RowBox[List["p", "-", "j", "-", "h", "+", "1"]], ")"]], "!"]]]]]]]]]]], " ", "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["m", "+", "p", "+", "1"]]], " ", RowBox[List[RowBox[List["(", RowBox[List["m", "-", "1"]], ")"]], "!"]]]]]], ")"]]]]]]]]]]]]]]]]]]]]]]

 MathML Form

 α log a ( z ) a α θ UnitStep ( Re ( - α ) ) a - α - 1 log ( z ) Γ ( - α ) k = 0 ( α + 1 ) k TagBox[SubscriptBox[RowBox[List["(", RowBox[List["\[Alpha]", "+", "1"]], ")"]], "k"], Pochhammer] Ei ( ( k + 1 ) log ( a ) ) a - k k ! + θ UnitStep ( - Re ( - α ) ) a - α - 1 log a ( z ) Γ ( 1 - α + α ) k = 0 ( α - α ) k TagBox[SubscriptBox[RowBox[List["(", RowBox[List["\[Alpha]", "-", RowBox[List["\[LeftFloor]", "\[Alpha]", "\[RightFloor]"]]]], ")"]], "k"], Pochhammer] a - k k ! m = 0 α + 1 ( α + 1 1 - m + α ) TagBox[RowBox[List["(", GridBox[List[List[TagBox[RowBox[List[RowBox[List["\[LeftFloor]", "\[Alpha]", "\[RightFloor]"]], "+", "1"]], Identity, Rule[Editable, True]]], List[TagBox[RowBox[List["1", "-", "m", "+", RowBox[List["\[LeftFloor]", "\[Alpha]", "\[RightFloor]"]]]], Identity, Rule[Editable, True]]]]], ")"]], InterpretTemplate[Function[Binomial[Slot[1], Slot[2]]]], Rule[Editable, False]] ( m - k - α ) 1 - m + α TagBox[SubscriptBox[RowBox[List["(", RowBox[List["m", "-", "k", "-", "\[Alpha]"]], ")"]], RowBox[List["1", "-", "m", "+", RowBox[List["\[LeftFloor]", "\[Alpha]", "\[RightFloor]"]]]]], Pochhammer] p = 0 m - 1 1 p ! ( ( - 1 ) p p ! + ( k + 1 ) log ( a ) 2 F ~ 2 ( 1 , 1 ; 2 , 1 - p ; ( k + 1 ) log ( a ) ) TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["\[InvisiblePrefixScriptBase]", FormBox["2", TraditionalForm]], SubscriptBox[OverscriptBox["F", "~"], FormBox["2", TraditionalForm]]]], "\[InvisibleApplication]", RowBox[List["(", RowBox[List[TagBox[TagBox[RowBox[List[TagBox["1", HypergeometricPFQRegularized, Rule[Editable, True]], ",", TagBox["1", HypergeometricPFQRegularized, Rule[Editable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQRegularized, Rule[Editable, False]], ";", TagBox[TagBox[RowBox[List[TagBox["2", HypergeometricPFQRegularized, Rule[Editable, True]], ",", TagBox[RowBox[List["1", "-", "p"]], HypergeometricPFQRegularized, Rule[Editable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQRegularized, Rule[Editable, False]], ";", TagBox[RowBox[List[RowBox[List["(", RowBox[List["k", "+", "1"]], ")"]], " ", RowBox[List["log", "(", "a", ")"]]]], HypergeometricPFQRegularized, Rule[Editable, True]]]], ")"]]]], InterpretTemplate[Function[HypergeometricPFQRegularized[Slot[1], Slot[2], Slot[3]]]], Rule[Editable, False]], HypergeometricPFQRegularized] ) ( ( - 1 ) m + p + 1 ( m - 1 ) ! + h = 0 m log 1 - h ( a ) S TagBox["S", StirlingS1] m ( h ) p ! j = 0 p - 1 ( - 1 ) j j ! ( 1 - j + p - h ) ! ) a α a z UnitStep -1 α a -1 α -1 z Gamma -1 α -1 k 0 Pochhammer α 1 k ExpIntegralEi k 1 a a -1 k k -1 UnitStep -1 -1 α a -1 α -1 a z Gamma 1 -1 α α -1 k 0 Pochhammer α -1 α k a -1 k k -1 m 0 α 1 Binomial α 1 1 -1 m α Pochhammer m -1 k -1 α 1 -1 m α p 0 m -1 1 p -1 -1 p p k 1 a HypergeometricPFQRegularized 1 1 2 1 -1 p k 1 a -1 m p 1 m -1 h 0 m a 1 -1 h StirlingS1 m h p j 0 p -1 -1 j j 1 -1 j p -1 h -1 [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List[SubscriptBox["\[PartialD]", RowBox[List[RowBox[List["{", RowBox[List["a_", ",", "\[Alpha]_"]], "}"]]]]], RowBox[List["Log", "[", RowBox[List["a_", ",", "z_"]], "]"]]]], "]"]], "\[RuleDelayed]", RowBox[List[FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["UnitStep", "[", RowBox[List["Re", "[", RowBox[List["-", "\[Alpha]"]], "]"]], "]"]], " ", SuperscriptBox["a", RowBox[List[RowBox[List["-", "\[Alpha]"]], "-", "1"]]]]], ")"]], " ", RowBox[List["Log", "[", "z", "]"]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], "\[Infinity]"], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["1", "+", "\[Alpha]"]], ",", "k"]], "]"]], " ", RowBox[List["ExpIntegralEi", "[", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "k"]], ")"]], " ", RowBox[List["Log", "[", "a", "]"]]]], "]"]]]], ")"]], " ", SuperscriptBox["a", RowBox[List["-", "k"]]]]], RowBox[List["k", "!"]]]]]]], RowBox[List["Gamma", "[", RowBox[List["-", "\[Alpha]"]], "]"]]], "+", FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["UnitStep", "[", RowBox[List["-", RowBox[List["Re", "[", RowBox[List["-", "\[Alpha]"]], "]"]]]], "]"]], " ", SuperscriptBox["a", RowBox[List[RowBox[List["-", "\[Alpha]"]], "-", "1"]]]]], ")"]], " ", RowBox[List["Log", "[", RowBox[List["a", ",", "z"]], "]"]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], "\[Infinity]"], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["\[Alpha]", "-", RowBox[List["Floor", "[", "\[Alpha]", "]"]]]], ",", "k"]], "]"]], " ", SuperscriptBox["a", RowBox[List["-", "k"]]]]], ")"]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["m", "=", "0"]], RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1"]]], RowBox[List[RowBox[List["Binomial", "[", RowBox[List[RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1"]], ",", RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1", "-", "m"]]]], "]"]], " ", RowBox[List["Pochhammer", "[", RowBox[List[RowBox[List["m", "-", "\[Alpha]", "-", "k"]], ",", RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "+", "1", "-", "m"]]]], "]"]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["p", "=", "0"]], RowBox[List["m", "-", "1"]]], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], "p"], " ", RowBox[List["p", "!"]]]], "+", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "k"]], ")"]], " ", RowBox[List["Log", "[", "a", "]"]], " ", RowBox[List["HypergeometricPFQRegularized", "[", RowBox[List[RowBox[List["{", RowBox[List["1", ",", "1"]], "}"]], ",", RowBox[List["{", RowBox[List["2", ",", RowBox[List["1", "-", "p"]]]], "}"]], ",", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "k"]], ")"]], " ", RowBox[List["Log", "[", "a", "]"]]]]]], "]"]]]]]], ")"]], " ", RowBox[List["(", RowBox[List[RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["h", "=", "0"]], "m"], RowBox[List[SuperscriptBox[RowBox[List["Log", "[", "a", "]"]], RowBox[List["1", "-", "h"]]], " ", RowBox[List["StirlingS1", "[", RowBox[List["m", ",", "h"]], "]"]], " ", RowBox[List["p", "!"]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "0"]], RowBox[List["p", "-", "1"]]], FractionBox[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], "j"], RowBox[List[RowBox[List["j", "!"]], " ", RowBox[List[RowBox[List["(", RowBox[List["p", "-", "j", "-", "h", "+", "1"]], ")"]], "!"]]]]]]]]]]], "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["m", "+", "p", "+", "1"]]], " ", RowBox[List[RowBox[List["(", RowBox[List["m", "-", "1"]], ")"]], "!"]]]]]], ")"]]]], RowBox[List["p", "!"]]]]]]]]]]], RowBox[List["k", "!"]]]]]]], RowBox[List["Gamma", "[", RowBox[List[RowBox[List["Floor", "[", "\[Alpha]", "]"]], "-", "\[Alpha]", "+", "1"]], "]"]]]]]]]]]

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

 2001-10-29