Re: Using Mathematica 5.2 and 7.01 with separate settings
- To: mathgroup at smc.vnet.net
- Subject: [mg104319] Re: Using Mathematica 5.2 and 7.01 with separate settings
- From: Alexey <lehin.p at gmail.com>
- Date: Tue, 27 Oct 2009 05:00:24 -0500 (EST)
- References: <h9ab6s$mmv$1@smc.vnet.net> <ha20tu$n2g$1@smc.vnet.net>
On 25 Oct, 08:18, Albert Retey <a... at gmx-topmail.de> wrote:
> since this has come up more than once, I would like to mention that
> actually I think everything is still there, it is just not documented
> and of course deprecated, but for most purposes it is probably not
> necessary to have a Version 5 installed in parallel. E.g. you can export
> a Graphics3D as a 2D-Vector-Graphic just as Version 5 did doing the
> following:
>
> Get["Version5`Graphics`"]
>
> Plot3D[x, {x, 0, 1}, {y, 0, 1}]
>
> now select the graphics, 'do save selection as' and choose a filename
> ending in e.g. eps. Of course one could try to automate the process and
> have a function do all that in one go. Of course you are limited to the
> graphics functionality of version 5. Oh, and don't forget to:
>
> Get["Version6`Graphics`"]
>
> to get back the new default behaviour.
>
> hth,
>
> albert
Hello,
As I have mentioned before, I need internal 2D-representation of
Graphics3D as Graphics for having an ability to optimize 2D-vector
representation of Graphics3D before exporting in vector format.
Unfortunately, v.7 have no ability to transform Graphics3D into
Graphics, try the following:
In[1]:= << Version5`Graphics`
g = Plot3D[Sin[x + y^2], {x, -3, 3}, {y, -2, 2}]
Graphics[g]
During evaluation of In[1]:= GraphicsData["PostScript", "\<\
%!
%%Creator: Mathematica
%%AspectRatio: .81114
MathPictureStart
....................
% End of Graphics
MathPictureEnd
\
\>"]
Out[2]= - SurfaceGraphics -
During evaluation of In[1]:= Graphics3D::optx: Unknown option
DefaultAxesStyle in Options[Graphics3D]. >>
Out[3]= - Graphics -
The result of evaluation of Graphics[g] is an empty graphics instead
of 2D-representation of 'g' as it is in v.5.