导出MMA8中断的一行图形对象

Question

如何使 Mathematica 导出Row图形。我不喜欢GraphicsRow如何处理图形，图中的所有宽高比和填充都搞砸了。我喜欢做的是处理每个人物，然后使用简单的Row，Column或Grid来组合我的数字。举例来说：

g1 = Plot[Sin[x], {x, -Pi, Pi}, 
      Frame -> True, FrameLabel -> {"x", "y"}, ImageSize -> 2.6*72
    ]

这会创建Sin图。我现在要做的是创建如下图：

Fig = Row[{g1, g1, g1}]

然后您可以使用Export

Export["TestFig.pdf", Fig]

这是我在MMA8中获得的pdf：

我刚刚在MMA7中尝试了这个代码，它运行正常。已经有一段时间了，因为我想创建这种类型的数字，我从不打扰检查它是否在MMA8中有效。在MMA8中有没有人对此有解决方法？

我想要的输出是我在MMA7中获得的输出：

Answer 1

值得注意的是GraphicsGrid assumes equal-width columns因此使用Grid有时会更有用。与belisarius的答案相同的语法适用。可能值得探索ImageSize的{​​{1}}选项（请参阅documentation和tutorial）。

另外，请注意PDF格式的导出使用PrintingStyleEnvironment，这不是屏幕上显示的内容。如果在“打印设置”中更改页面设置，可能会获得更好的效果。

Answer 2

Export["c:\\TestFig.pdf", GraphicsGrid[{{g1, g1, g1}}]]