Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

The risks of Sphere export

37 views
Skip to first unread message

Andrzej Kozlowski

unread,
Nov 15, 2012, 4:05:31 AM11/15/12
to
The following will crash my Mathematica every time:

Export["cellular.pdf",
Graphics3D[
Sphere /@
Position[CellularAutomaton[{10, {2, 1}, {1, 1}}, {{{1}}, 0}, 20],
1], ViewVertical -> {-1, 0, 0}], "PDF"]

However, if I replace Sphere by Cuboid,i.e.

Export["cellular.pdf",
Graphics3D[
Cuboid /@
Position[CellularAutomaton[{10, {2, 1}, {1, 1}}, {{{1}}, 0}, 20],
1], ViewVertical -> {-1, 0, 0}], "PDF"]

I get no crash.

$Version

8.0 for Mac OS X x86 (64-bit) (October 5, 2011)

?

Andrzej Kozlowski

Yves Klett

unread,
Nov 16, 2012, 3:03:30 AM11/16/12
to
Confirmed on Windows 7, Mathematica 8.04 with 16GB.

Even just evaluating:

Export["cellular.pdf",
Graphics3D[
Sphere /@
Position[CellularAutomaton[{10, {2, 1}, {1, 1}}, {{{1}}, 0}, 1],
1], ViewVertical -> {-1, 0, 0}]]

results in a horrible 21MB PDF with a gazillion polygons. Spheres and
Tubes do not work well together with PDF in my experience.

I would go for rasterizing at a suitable resolution.

Regards,
Yves

Vince Virgilio

unread,
Nov 16, 2012, 3:05:53 AM11/16/12
to
Confirmed on Win 7 x64. Though, my Mathematica doesn't crash but hangs.

In[2]:= $Version
Out[2]= 8.0 for Microsoft Windows (64-bit) (October 7, 2011)
0 new messages