MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Convert Graphics3D to Graphics2D. Is it possible?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg103965] Re: [mg103886] Convert Graphics3D to Graphics2D. Is it possible?
  • From: Tim Kostka <kostka at gmail.com>
  • Date: Wed, 14 Oct 2009 07:54:27 -0400 (EDT)
  • References: <200910101111.HAA12792@smc.vnet.net>

What I have been doing is using a combination of Rasterize and Magnify to
get the desired dimensions, then export the image as a PNG.  For example:
plot=ParametricPlot3D[{Cos[\[Theta]], Sin[\[Theta]], Sqrt[\[Theta]]},
{\[Theta], 0, 6 Pi}]
image=Rasterize[Magnify[plot,2]]
Export["image.png",image]

Change the magnification as needed to get the desired dpi setting.

I realize this is not a vector graphic, but the resulting image is
reasonable in size and is very flexible to work with.

Regards,
Tim Kostka

On Sat, Oct 10, 2009 at 4:11 AM, Alexey <lehin.p at gmail.com> wrote:

> Hello,
> My aim is to produce vector-quality 2D representation of Graphics3D
> for publication purposes. I would wish to have a general solution but
> if it is impossible in the new version of Mathematica I should
> consider only my particular case. My Graphics3D consists of a smooth
> line representing the solution of a system of differential equations
> (and axes, of course). So it seems to be a simple case. Is it possible
> to convert this 3D graphics in 2D format preserving text as text (not
> converting text in vector lines)?
>
> As an suitable example one may use Graphics3D generated by
> ParametricPlot3D[{Cos[\[Theta]], Sin[\[Theta]],
>  Sqrt[\[Theta]]}, {\[Theta], 0, 6 Pi}]
>
>



  • Prev by Date: Re: Convert Graphics3D to Graphics2D. Is it possible?
  • Next by Date: Re: ErrorListPlot with Indeterminate list elements
  • Previous by thread: Re: Convert Graphics3D to Graphics2D. Is it possible?
  • Next by thread: Re: Convert Graphics3D to Graphics2D. Is it possible?