5

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

示例：我在 Mathematica 笔记本中生成了一个包含 100 个笔记的完整图形并保存了该图形。出现了下面非常详细的图像：

耶！ 高质量图表：

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

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

我失去了边缘的所有细节

不好了！失去了很多质量！连边缘都看不到了……

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

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

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

4

2 回答 2

3

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

然后导出指定适当的图像分辨率：

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

有关更多详细信息，请在mathematica.SE 上查看此问题

于 2012-04-07T03:07:37.027 回答
1

试试这个：

Export["mysuperawesomegraph.png", CompleteGraph[100, ImageSize -> 1000]]
于 2012-04-07T04:09:15.917 回答