Wolfram Language

Symbolische & numerische Integral- und Differentialrechnung

Führen Sie eine Mellin-Faltung durch

Führen Sie mit MellinConvolve eine Mellin-Faltung zweier Funktionen durch.

In[1]:=
Click for copyable input
MellinConvolve[UnitBox[x - 3/2], 2 UnitBox[x - 2], x, y]
Out[1]=

Plotten Sie das Resultat gemeinsam mit den ursprünglichen Funktionen.

In[2]:=
Click for copyable input
MellinConvolve[UnitBox[x - 3/2], 2 UnitBox[x - 2], x, y]; Plot[{UnitBox[y - 3/2], 2 UnitBox[y - 2], %} // Evaluate, {y, 0, 6}, Filling -> Axis, Exclusions -> None, PlotRange -> All]
Out[2]=

Führen Sie eine Mellin-Faltung zweier Bessel-Funktionen durch.

In[3]:=
Click for copyable input
MellinConvolve[BesselJ[0, x], BesselJ[1, x], x, y]
Out[3]=

Plotten Sie das Resultat gemeinsam mit den ursprünglichen Funktionen.

In[4]:=
Click for copyable input
MellinConvolve[BesselJ[0, x], BesselJ[1, x], x, y]; Plot[{BesselJ[0, y], BesselJ[1, y], %} // Evaluate, {y, 0, 10}, Filling -> Axis, PlotLegends -> "Expressions"]
Out[4]=

Führen Sie eine multivariate Mellin-Faltung durch.

In[5]:=
Click for copyable input
MellinConvolve[3 UnitBox[s - 3/2, t - 7/4], 2 UnitBox[s - 1, t - 1], {s, t}, {m, n}]
Out[5]=

Plotten Sie das Resultat gemeinsam mit den Originalfunktionen.

In[6]:=
Click for copyable input
MellinConvolve[3 UnitBox[s - 3/2, t - 7/4], 2 UnitBox[s - 1, t - 1], {s, t}, {m, n}]; Plot3D[{3 UnitBox[m - 3/2, n - 7/4], 2 UnitBox[m - 1, n - 1], %} // Evaluate, {m, 0, 3}, {n, 0, 3}, PlotRange -> All, Filling -> Axis, PlotPoints -> 50, Exclusions -> None, PlotStyle -> Opacity[0.4], Ticks -> None, Mesh -> None]
Out[6]=

Verwandte Beispiele

en es fr ja ko pt-br ru zh