Visualization Notes
Saturday, December 21, 2019
Surfaces' Coordinates
Plot3D[Table[(x^2-y^2)^4 *z^2,{z,9,49,10}] // Evaluate,
{x,-.5,.5},{y,-.5,.5}, PlotStyle->Opacity[.3],
ColorFunction->"BrightBands",Mesh->False,
ClippingStyle->None,Boxed->False,
Axes->False,PlotLabel->"Surfaces' Coordinates"]
No comments:
Post a Comment
Newer Post
Older Post
Home
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment