How to make grid of plots with a single pair of FrameLabels? I need a code similar to the below one. Actually, I could not find the command "figure panel" in Mathematica version 9!!!..
<< "LevelScheme`" Figure[{ Multipanel[{{0, 1}, {0, 1}}, {1, 3}, XFrameLabels -> textit["x"], BufferB -> 3, YFrameLabels -> textit["Sinc(x)"], BufferL -> 3, TickFontSize -> 9, XGapSizes -> {0.1, 0.1}, PanelLetterCorner -> {1, 1} ], FigurePanel[{1, 1}, PlotRange -> {{-1.6, -0.6}, {-0.5, 1}}], RawGraphics[Plot[Sinc[20 x], {x, -1.6, -0.6}]],
FigurePanel[{1, 2}, PlotRange -> {{-0.5, 0.5}, {-0.5, 1}}], RawGraphics[Plot[Sinc[20 x], {x, -0.5, 0.5}]],
FigurePanel[{1, 3}, PlotRange -> {{0.6, 1.6}, {-0.5, 1}}], RawGraphics[Plot[Sinc[20 x], {x, 0.6, 1.6}]] }, PlotRange -> {{-0.1, 1.02}, {-0.12, 1.095}}]
Attachments: