Как сделать Mathematica экспортировать Row
графики.Мне не нравится, как GraphicsRow
обрабатывает графику, все пропорции и отступы на рисунках испорчены.Мне нравится работать с каждой отдельной фигурой, а затем использовать простые Row
, Column
или Grid
для объединения моих фигур.Возьмем, к примеру, следующее:
g1 = Plot[Sin[x], {x, -Pi, Pi},
Frame -> True, FrameLabel -> {"x", "y"}, ImageSize -> 2.6*72
]
Это создает график греха.Теперь я хочу создать следующий рисунок:
Fig = Row[{g1, g1, g1}]
Тогда вы можете использовать Export
Export["TestFig.pdf", Fig]
Это PDF-файлЯ получаю в MMA8:
Я только что попробовал этот код в MMA7, и он работает нормально.Я давно хотел создать фигуры такого типа, и я никогда не удосужился проверить, сработало ли это в MMA8.У кого-нибудь есть исправление для этого в MMA8?
Желаемый вывод - тот, который я получил в MMA7: