Re: Problem with Out keeping the camera view direction
- To: mathgroup at smc.vnet.net
- Subject: [mg84353] Re: Problem with Out keeping the camera view direction
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Thu, 20 Dec 2007 00:04:13 -0500 (EST)
- References: <fkanmh$dj0$1@smc.vnet.net>
Hi,
try
{vp, vc, vv} =
OptionValue[Plot3D, #] & /@ {ViewPoint, ViewCenter, ViewVertical};
Plot3D[Sqrt[1 - x^2 - y^2], {x, -1, 1}, {y, -1, 1},
MeshShading -> {{Yellow, Orange}, {Pink, Red}}, Mesh -> 10,
Evaluate[
Sequence @@
Thread[{ViewPoint, ViewCenter, ViewVertical} -> {Dynamic[vp],
Dynamic[vc], Dynamic[vv]}]
], MaxRecursion -> 2, WorkingPrecision -> 20,
PlotPoints -> {100, 100}, Boxed -> False, Background -> Black]
to save the camera position and orientation in vp,vc,vv
and use the values when you save the graphics.
Regards
Jens
Camille JORDAN wrote:
> Ok let' say we run this command
>
> Plot3D[Sqrt[1 - x^2 - y^2], {x, -1, 1}, {y, -1, 1},
> MeshShading -> {{Yellow, Orange}, {Pink, Red}}, Mesh -> 10,
> MaxRecursion -> 2, WorkingPrecision -> 20, PlotPoints -> {100, 100},
> Boxed -> False, Background -> Black]
>
> that produces a nice semi sphere
>
> now use the Mouse cursor to rotate the semisphere to a different
> position. or Alt to zoom in or out etc
> and then use
>
> Rasterize[Out[3]]
> assuming the Out[3] is the output from the above Plot3D command
>
> shouldn't Rasterize of the Out[3] keep the same camera view port
> coordinates?
>
> How can I get the view port coordinates from the Out[3] so that I can
> place that directly on my Plot3D then?
> Thanks for the help.
>