4

I am attempting to export a 3D plot from mathematica with no background, but I seem to be unable to find a way.

ParametricPlot3D[{{Cos[x], Sin[x], x}, {Sin[x], Cos[x], x}}, {x, 0, 
  1}, PlotLegends -> {a, b}, Background -> None]
Export["test.eps", %, Background -> None]

The background of the legend is transparent, but not that behind the figure. I am able to do it in the case of 2D plots.

zalba19
  • 269
  • 2
  • 6

1 Answers1

5

With version 10.4.1 I get the plot rasterized (but not the legend) with your code. As a workaround you can use the Jens' trick:

Export["myFig2.eps", Graphics[Inset[pl, Automatic, Automatic, Scaled[1]]]];

Here is how the exported EPS file looks when opened by Adobe Acrobat 11 (I have selected a number on the frame in order to show that it is a selectable text):

scrrenshot

Not ideal but at least it is in vectors and has no background (the following is a screenshot of a MS Word 2003 document where I imported the EPS figure):

screenshot

Alexey Popkov
  • 61,809
  • 7
  • 149
  • 368