通过Mathematica脚本增加图形细节

Question

我的目标是通过脚本生成大型图形并保存它们的图像（最好是PNG格式），而不需要通过笔记本进行交互。

例如：我在Mathematica笔记本上生成了一个完整的100个节点的图形，并保存了该图形。下面是精美详细的图像：

但是当我按照以下脚本保存时：

graph = CompleteGraph[100];
Export["mysuperawesomegraph.png", ImageResize[graph, 1000]];

哦不！失去了这么多的质量！你甚至看不到边缘了...

我已经尝试将行中的数字1000更改为15000及更高的数字：

Export["mysuperawesomegraph.png", ImageResize[graph, 1000]];

结果似乎是保存了更大的图像，但具有相同的细节水平。

- rjkaplan

Answer 1

首先，您需要找到适合屏幕的良好尺寸。这样看起来不错：Show[graph, ImageSize -> 1000]

然后，导出时要指定正确的图像分辨率：

Export["mysuperawesomegraph.png", 
       Show[graph, ImageSize -> 1000], ImageResolution -> 200]

如果需要更多细节，请查看这个与Mathematica有关的问题。

- Matthias Odisio

---

太棒了！谢谢你！对我来说，设置ImageResolution似乎是不必要的——似乎它可以在没有此设置的情况下正常工作。 - rjkaplan

Answer 2

试试这个：

Export["mysuperawesomegraph.png", CompleteGraph[100, ImageSize -> 1000]]

- withparadox2

---

谢谢回复！使用CompleteGraph[]函数时可以工作，但不适用于在大图像中显示任意图形。 - rjkaplan