How to | Create 3D Graphics
3D graphics can be created with a number of powerful Wolfram Language functions. 3D graphics in the Wolfram Language can be rotated and zoomed using a standard mouse or even a joystick or gamepad.
Create a sphere using Graphics3D:
Graphics3D[Sphere[]]Visualize the equation
using Plot3D:
Plot3D[Cos[y]Sin[y] == Sin[x] Cos[x], {x, -2Pi, 1.5 Pi}, {y, -2 Pi, 1.5 Pi}]Use ContourPlot3D to make a hyperboloid of one sheet:
ContourPlot3D[x ^ 2 + y ^ 2 - z ^ 2 == 1, {x, -3 , 3 }, {y, -3 , 3}, {z, -3, 3}]Using ParametricPlot3D is another way to make 3D graphics:
ParametricPlot3D[{x y ^ 2, y x ^ 2, 1 - Sqrt[x ^ 2 + y ^ 2]}, {x, -1, 1}, {y, -1, 1}]Use RevolutionPlot3D to make a 3D graphic by revolving a function curve around the
axis:
RevolutionPlot3D[t ^ 4 - t ^ 2 + t / 4, {t, -1, 1}]Use SphericalPlot3D to plot a 3D surface given in spherical coordinates:
SphericalPlot3D[0.1 - Cos[4θ], {θ, 0, Pi}, {ϕ, 0, 2Pi}]Use ListPointPlot3D to make 3D graphics of a set of points on a quadruple helix:
ListPointPlot3D[Table[Table[{t, Cos[t + s Pi / 2], Sin[t + s Pi / 2]}, {t, 0, 5Pi, .2}], {s, 4}], BoxRatios -> Automatic]