نمونه 2 گام، بهترتیب در یک نشست اجرا میشوند. هر گام روی موتور اجرا شده و خروجی زیر همان چیزی است که تولید کرد.
windows = {DirichletWindow, BartlettWindow, KaiserWindow, HannWindow, HammingWindow, BlackmanWindow};
f = Table[FourierTransform[win[x], x, w], {win, windows}];بدون خروجی - این گام چیزی را برای گام بعد آماده میکند.
Partition[MapThread[LogLinearPlot[Evaluate[20 Log[10, # / Limit[#, w -> 0]]], {w, .1, 100}, GridLines -> Automatic, PlotRange -> {Automatic, {0, -80}}, PlotLabel -> #2]&, {f, windows}], 3]//GridGrid[{{-Graphics-, -Graphics-, -Graphics-}, {-Graphics-, -Graphics-, -Graphics-}}]همهٔ دستورهای کار · مرجع توابع · استفاده از این در کلاینت MCP