I'm not sure what the issue is here. Part of the Plot3D
graph disappears when I use the slider.
Manipulate[
Show[{
Plot3D[x^2 + 2 y^2, {x, y} \[Element] Disk[]],
Graphics3D[{Black, Thick,
Line[{{Cos[t], Sin[t], 0}, {Cos[t], Sin[t],
Cos[t]^2 + 2 Sin[t]^2}}]}]}, PlotRange -> 2],
{t, 0, 2 Pi}]
How can I fix this? I run across these issues from time to time when using multiple graphics with Manipulate
. Either it runs too slow or get some kind of behavior shown here. Can you direct to some tips on programming Manipulate
s?
Manipulate
ing the plot, you should generate thePlot3D
outside of theManipulate
and insert it withWith
. That will fix this issue and possibly others. $\endgroup$PerformanceGoal -> "Quality"
toPlot3D
? $\endgroup$Initialization
that is all. When Making demos for Wolfram website, all things like this has to go to Initialization. So I am used to doing it that way. $\endgroup$