Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: From 3D to 2D

  • To: mathgroup at smc.vnet.net
  • Subject: [mg90594] Re: From 3D to 2D
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Tue, 15 Jul 2008 06:16:56 -0400 (EDT)
  • References: <g5f61i$rdp$1@smc.vnet.net>

Hi,

what is wrong with

g2D = ImportString[ExportString[g3D, "PDF"], "PDF"][[1]]

??

Regards
   Jens

congruentialuminaire at yahoo.com wrote:
> Hello UG:
> 
> I stumbled across another method [applicable with V6] with apparently
> less overhead compared to the earlier provided solution. This is:
> 
> g3D = Plot3D[Sin[x*y], {x, 0, Pi}, {y, 0, Pi}]
> 
> g2D = GraphicsGrid[{List@g3D}]
> 
> g2D // Head
> 
> This method seems to leave the front-end confused. It still gives the
> rotate cursor and indeed lets you rotate the graphic, but it
> apparently cannot be resized.
> 
> So maybe this method is problematic, but it did allow me to combine
> the 2D version with some 2D primitives for annotation [which was my
> original goal].
> 
> HTH.
> 
> Regards..RogerW
> ----------------------------------------------------------------------------------------------
> On Dec 11 2007, 4:10 am, Jens-Peer Kuska <ku... at informatik.uni-
> leipzig.de> wrote:
>> Hi,
>>
>> in older Mathematica versions the simple
>> call of Graphics[your3dGraphicsObject]
>> would generate the2dversion. This
>> usefull feature is gone with version 6
>> but you cann still export the3dgraphics to
>> a2dvector format and obtain the same effect, i.e.
>>
>> gg = Plot3D[Sin[x*y], {x, 0, Pi}, {y, 0, Pi}]
>>
>> test = ImportString[ExportString[gg, "PDF"], "PDF"]
>>
>> and test is the2dgraphics you want.
>>
>> Regards
>>    Jens
> 


  • Prev by Date: Re: Wacky Font Substitution in .eps Export
  • Next by Date: Another problem with FindMinimum
  • Previous by thread: Re: From 3D to 2D
  • Next by thread: Re: From 3D to 2D