带EdgeLabels的Mathematica + GraphPlot + GraphicsGrid

Question

我在GraphicsGrid上遇到了一些非常奇怪的问题。单独的PraphPlot:s看起来不错，但是代码GraphicsGrid[{{GraphPlot[{{a -> b, "ab"}, {a -> c, "7"}}]}, {GraphPlot[{{a -> b, "5"}, {a -> c, "2"}}]}}]只会产生两大堆垃圾。如果我去掉边缘标签，一切都会正常工作。我使用的是Mathematica 7.0.0。

Answer 1

我得到了和你一样的东西，尽管我会说它们是小垃圾。我折腾了几分钟，得到了这样的结果：

g1 = GraphPlot[{{a -> b, "ab"}, {a -> c, "7"}}];
g2 = GraphPlot[{{a -> b, "5"}, {a -> c, "2"}}];
Grid[{{g1}, {g2}}]

这有点不同，但可能会有一些用处。我得回去工作了。

Answer 2

就我个人而言，我讨厌使用GraphicsGrid，因为我发现它的结果不可预测。正如您在@High Performance Mark的回答中所说的，这将包含在一篇论文(即LaTeX)中，我建议您使用Mark Caprio的LevelScheme package。他花了很多时间来研究如何在Mathematica中布局图形，并且它允许您使用记号标记来做一些在默认情况下Mathematica不会做的事情。它不是世界上最快的包，需要一点时间来学习，但我强烈推荐它。