関数をMeijerGで表す: Wolfram言語 11の新機能

‹›

関数をMeijerGで表す

SinをMeijerGで表す．

In[1]:=

MeijerGReduce[Sin[x], x]

Out[1]=

もとの式を復元する．

In[2]:=

MeijerGReduce[Sin[x], x];
Activate[%]

Out[2]=

MeijerGによる表現のギャラリーを作成する．

完全なWolfram言語入力を表示する

In[3]:=

flist = {E^(-x), Sin[x], 
     Cos[x], Sinh[x], Cosh[x], BesselJ[n, x], BesselK[n, x], 
  AiryAi[x], AiryBi[x], Hypergeometric2F1[a, b, c, x], 
  UnitStep[x - 1], UnitBox[x]}; TraditionalForm @
 ReplaceAll[
  Grid[Map[Style[#, ScriptLevel -> 0] &, 
    Join[{{HoldForm[f[x]], Text["MeijerG Representation"]}}, 
     Transpose[{flist, Map[MeijerGReduce[#, x] &, flist]}]], {2}], 
   Background -> {None, {{None, GrayLevel[.9]}}, {{1, 1} -> 
       Hue[.6, .4, 1], {1, 2} -> Hue[.6, .4, 1]}}, 
   BaseStyle -> {FontFamily -> Times, FontSize -> 13}, 
   Dividers -> All, FrameStyle -> Hue[.6, .4, .8], Spacings -> {2, 1}],
  Inactive[MeijerG][args__] :> HoldForm[MeijerG[args]]]

Out[3]//TraditionalForm=