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}]