Re: axis alignment of 3D plots with ListContourPlot3D
- To: mathgroup at smc.vnet.net
- Subject: [mg87926] Re: [mg87886] axis alignment of 3D plots with ListContourPlot3D
- From: "W_Craig Carter" <ccarter at mit.edu>
- Date: Sat, 19 Apr 2008 23:54:19 -0400 (EDT)
- References: <200804190735.DAA09875@smc.vnet.net>
Hello Jess,
This will work, it is not efficient, but fairly straightforward to
modify for you own purposes:
data = Table[{Sin[RandomReal[{-x, x}]], Cos[RandomReal[{-x, x}]],
Cos[ x]}, {x, 0, 1, .01}];
plot = ListPlot3D[data]
ViewFrom[myplot_, r_, theta_, phi_] :=
Show[myplot,
ViewPoint -> r {Cos[theta] Sin[phi], Sin[theta] Sin[phi], Cos[phi]}]
(*here I use spherical coordinates, but the choice is yours)
ViewFrom[plot, 1.2, Pi/6, Pi/3]
(*
ViewFrom, save an image, ViewFrom, save an image...
You can also program your own "flight trajectory" and "speed"
*)
On Sat, Apr 19, 2008 at 3:35 AM, Jess <jesscobrien at gmail.com> wrote:
> Can anyone tell me how I can manually the view angle of a
> ListContourPlot3D? Mathematica seems to automatically set the view
> angle according to the data distribution. I need to do this because I
> am generating a series of 3D graphics with ListContourPlot3D, which I
> then animate into a AVI movie using the export command. As the
> distribution changes shape significantly in each image, Mathematica
> automaitcally shifts the view angle substantially, which unfortunately
> makes the resulting animation appear to shake as the view angle
> changes.
>
> Cheers,
> Jess
>
>
--
W. Craig Carter
- References:
- axis alignment of 3D plots with ListContourPlot3D
- From: Jess <jesscobrien@gmail.com>
- axis alignment of 3D plots with ListContourPlot3D