Graph []切断了Mathematica中的顶点标签

Question

Graph[]有倾向于切断Mathematica中的顶点标签.我正在寻找一个强大的解决方法.

例:

Graph[{1 -> 2, 2 -> 3, 3 -> 1}, VertexLabels -> "Name"]

我目前的解决方法:

SetOptions[Graph, ImagePadding -> 12]

这不稳定,因为ImagePadding需要根据标签大小手动调整值.

Answer 1

显然，在对象FullGraphics上使用Graph将修复用于显示目的的剪裁，但会牺牲交互性。

根据下面的评论，Show[]也可以工作，并且避免修改图形。