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

MathGroup Archive 2008

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

Search the Archive

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