1
$\begingroup$

If I'm not mistaken, the code below should produce two identical pictures of a torus. But it does not. The MeshStyle->Thick option seems to be ignored for the first. Obviously the second code provides a workaround - but is this a bug, or do I not know how "SetOptions" works?

SetOptions[ParametricPlot3D,
    Axes->False,
    Boxed->False,
    Mesh->20,
    PlotStyle->Glow[White],
    MeshStyle->Thick
    ]


g1 =    ParametricPlot3D[
    {Cos[u]*(Sqrt[2]+Cos[t]), Sin[u]*(Sqrt[2]+Cos[t]),Sin[t]
    }, {u,0,2Pi},{t,0,2Pi}]

g2 =    ParametricPlot3D[
    {Cos[u]*(Sqrt[2]+Cos[t]), Sin[u]*(Sqrt[2]+Cos[t]),Sin[t]
    }, {u,0,2Pi},{t,0,2Pi},
    MeshStyle->Thick
    ]

enter image description here

$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Browse other questions tagged or ask your own question.