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$
2

0

Your Answer

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

Browse other questions tagged or ask your own question.