Wednesday, December 25, 2019

3D Visual Reflections of Inequalities


ContourPlot3D[x^6+y^6+z^6-(x^2+y^2+z^2)==-1/2,
{x,-1,1},{y,-1,1},{z,-1,1},PlotPoints->30,
Mesh->30,MeshFunctions->{#1^2+#2^2+#3^2 &},
MeshShading->{None,Blue,None,Gray},
MeshStyle -> Opacity[.3],Axes -> False,Boxed -> False]


No comments:

Post a Comment