通过Mathematica中的脚本增加图形细节

Question

我的目标是通过脚本生成大图并保存它们的图像（最好是PNG）（即：无需通过笔记本与它们交互）。

示例：我在Mathematica笔记本中生成100个音符的完整图表并保存图形。下面是非常详细的图片：

但是当我通过脚本保存它时如下：

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

哦不！如此多的质量丢失了！你甚至看不到边缘......

我已尝试将数字1000更改为最多15000行中的数字：

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

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

Answer 1

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

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

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

有关详细信息，请查看this question on mathematica.SE

Answer 2

试试这个：

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