Contoh 1 langkah, dijalankan berurutan dalam satu sesi. Setiap langkah dieksekusi pada mesin dan keluaran di bawah adalah apa yang dihasilkannya.
Plot3D[Re[Sin[x + I y]], {x, -2Pi, Pi}, {y, -2Pi, 2Pi}, ImageSize -> 400, ClippingStyle -> {Orange, Blue}, Mesh -> None, ColorFunction -> "AvocadoColors", Axes -> False, Boxed -> False, PlotLegends -> {Placed[BarLegend[Automatic, LabelStyle -> {14, Gray}], Right], Placed[SwatchLegend[{Blue, Orange}, {"> 50", "< -50"}, LegendMarkerSize -> Large, LegendMarkers -> Automatic, LabelStyle -> {Bold, 18, Gray}], Top]}]-Graphics3D-