Re: Problem with Manipulate
- To: mathgroup at smc.vnet.net
- Subject: [mg83130] Re: Problem with Manipulate
- From: Jon McLoone <jonm at wolfram.co.uk>
- Date: Mon, 12 Nov 2007 05:15:08 -0500 (EST)
- References: <fh3qkm$ln$1@smc.vnet.net><fh6dbg$4nl$1@smc.vnet.net>
On Nov 11, 8:09 am, "Steve Luttrell"
<steve at _removemefirst_luttrell.org.uk> wrote:
> Use a larger value of PlotPoints inside Plot3D, such as this:
>
> Manipulate[Plot3D[V[\[Beta],x,z],{x,-L,L},{z,-L,L},PlotPoints->30,PlotRange->{0,20},PlotStyle->Opacity[0.8]],{\[Beta],0,0.99}]
>
> --
> Steve Luttrell
> West Malvern, UK
>
> "Kevin J. McCann" <Kevin.McC... at umbc.edu> wrote in messagenews:fh3qkm$ln$1 at smc.vnet.net...
>
> > The following code produces a 3d plot as a function of beta; however,
> > when I play the "movie", the plots are incomplete until I stop it. Any
> > ideas?
>
> > Kevin
>
> > \[Beta] =.
> > x =.
> > z =.
> > V[\[Beta]_, x_, z_] :=
> > 1/Sqrt[x^2 + z^2] 1/Sqrt[1 - \[Beta]^2 x^2/(x^2 + z^2)]
> > cntrs = Table[c, {c, 0, 10, 1}];
> > L = 1;
> > Manipulate[
> > Plot3D[V[\[Beta], x, z], {x, -L, L}, {z, -L, L}, PlotPoints -> 10,
> > PlotRange -> {0, 20}, PlotStyle -> Opacity[0.8]], {\[Beta], 0,
> > 0.99}]
>
> > --
>
> > Kevin J. McCann
> > Research Associate Professor
> > JCET/Physics
> > Physics Building
> > University of Maryland, Baltimore County
> > 1000 Hilltop Circle
> > Baltimore, MD 21250
You are being affected by the option PerformanceGoal
In[32]:= OwnValues[$PerformanceGoal]
Out[32]= {HoldPattern[$PerformanceGoal] :>
If[$ControlActiveSetting, "Speed", "Quality"]}
Overide this with
PerformanceGoal -> "Accuracy"
But Opacity is expensive for animation so try also adding
PlotStyle -> ControlActive[Automatic, Opacity[0.8]]
ie
\[Beta] =.
x =.
z =.
V[\[Beta]_, x_, z_] :=
1/Sqrt[x^2 + z^2] 1/Sqrt[1 - \[Beta]^2 x^2/(x^2 + z^2)]
cntrs = Table[c, {c, 0, 10, 1}];
L = 1;
Manipulate[
Plot3D[V[\[Beta], x, z], {x, -L, L}, {z, -L, L}, PlotPoints -> 10,
PlotRange -> {0, 20}, PerformanceGoal -> "Accuracy",
PlotStyle -> ControlActive[Automatic, Opacity[0.8]]], {\[Beta], 0,
0.99}]