Obtenha diferenças e razões simples para funções especiais 

Obtenha diferenças e razões simples para Beta e GammaRegularized.

In[1]:=

X DifferenceDelta[Beta[z, n, m], n]

Out[1]=

In[2]:=

X DiscreteRatio[Beta[z, n, m], n]

Out[2]=

In[3]:=

X DifferenceDelta[GammaRegularized[n, z], n]

Out[3]=

In[4]:=

X DiscreteRatio[GammaRegularized[n, z], n]

Out[4]=

Crie uma galeria de diferenças e razões elegantes.

mostre o input completo de Wolfram Languageoculte o input

In[5]:=

X diffratios = Inactivate[{DifferenceDelta[Gamma[n, z], n] , DifferenceDelta[GammaRegularized[n, z], n], DifferenceDelta[Beta[z, n, m], m] , DifferenceDelta[MarcumQ[n, a, z], n], DiscreteRatio[Gamma[n, z], n] , DiscreteRatio[GammaRegularized[n, z], n], DiscreteRatio[Beta[z, n, m], m], DiscreteRatio[MarcumQ[n, a, z], n]}, DifferenceDelta | DiscreteRatio]; FormulaGallery[forms_List] := Module[{vals = ParallelMap[Activate, forms]}, Column[Table[ Style[forms[[r]] == vals[[r]], ScriptLevel -> 0], {r, Length[forms]}], Dividers -> All, Alignment -> "\[LongEqual]", Background -> LightOrange, Spacings -> 1]]; FormulaGallery[diffratios] // TraditionalForm

Out[5]//TraditionalForm=