image - Mathematica + GraphPlot + GraphicsGrid 与 EdgeLabels

Question

我对 GraphicsGrid 有一些非常奇怪的问题。单独的 PraphPlot:s 看起来不错，但代码 GraphicsGrid[{{GraphPlot[{{a -> b, "ab"}, {a -> c, "7"}}]}, {GraphPlot[{{a -> b, "5"}, {a -> c, "2"}}]}}] 只会产生 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 包。他花了很多时间弄清楚如何在 Mathematica 中布置图形，它允许您使用 Mathematica 默认不做的标记做一些理智的事情。它不是世界上最快的软件包，需要一点时间来学习，但我强烈推荐它。