- #1
member 428835
Hi PF!
I'm trying to have color contours of a surface and then manipulate the surface. Using the sample code below, we see that if you step forward Mathematica plots the surface and then also the color contours. However, rather than stepping forward, if we play the video the color contours don't show. Any help would be amazing!
Manipulate[
Show[ParametricPlot3D[{2 s t z, 3 s t, s^2}, {s, -1, 1}, {z, 0, 1},
PlotStyle -> {{Blue, Lighting -> "Neutral", Specularity[Blue, 0.3],
Opacity[0.9]}},
MeshStyle -> {{Yellow, Thick}, {Yellow, Thick}}]], {t, 0, 1}]
I'm trying to have color contours of a surface and then manipulate the surface. Using the sample code below, we see that if you step forward Mathematica plots the surface and then also the color contours. However, rather than stepping forward, if we play the video the color contours don't show. Any help would be amazing!
Manipulate[
Show[ParametricPlot3D[{2 s t z, 3 s t, s^2}, {s, -1, 1}, {z, 0, 1},
PlotStyle -> {{Blue, Lighting -> "Neutral", Specularity[Blue, 0.3],
Opacity[0.9]}},
MeshStyle -> {{Yellow, Thick}, {Yellow, Thick}}]], {t, 0, 1}]
Last edited by a moderator: