2
$\begingroup$

I am trying to create a spherical colour plot on which the mesh will rotate with manipulating the \phi1 variable. I read this solution and gave it a try with the following code:

Manipulate[
  SphericalPlot3D[1, {θ, 0, π}, {ϕ, 0, 2 π}, 
    ColorFunction ->
      Function[{x, y, z, θ, ϕ}, 
        ColorData[{"Rainbow", {-1, 1}}][Sin[θ] Sin[ϕ - ϕ1]]], 
    ColorFunctionScaling -> False,
    PlotStyle -> Opacity[0.8],
    ImageSize -> 750,
    PlotRange -> {{-1.3, 1.3}, {-1.3, 1.3}, {-1.3, 1.3}}, 
    Mesh -> {8, {ϕ1, π + ϕ1}},
    MeshStyle -> {Black, Opacity[0.5]},
    Boxed -> False,
    Axes -> False],
  {{ϕ1, 0.4}, 0, 2 π}]

The result is mostly satisfactory, except for the extra mesh line at $\phi=0$, which does not rotate with the other mesh lines when $\phi1$ is changed in manipulate.

My question: how do I remove the stationary mesh line, or make it rotate with the other mesh lines properly?

$\endgroup$

1 Answer 1

6
$\begingroup$

Add the option BoundaryStyle -> None to SphericalPlot3D to get

enter image description here

$\endgroup$
1
  • $\begingroup$ Worked like a charm! Thx! $\endgroup$
    – Lezhi Lo
    Aug 15, 2019 at 3:50

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.