[Date Index]
[Thread Index]
[Author Index]
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
Prev by Date:
**Re: How to solve this simple equation?**
Next by Date:
** Re: problem accessing notebooks**
Previous by thread:
**axis alignment of 3D plots with ListContourPlot3D**
Next by thread:
**Re: axis alignment of 3D plots with ListContourPlot3D**
| |