例 1 ステップを1つのセッション内で順に実行します。各ステップはエンジンで実行済みで、以下の出力は実際に生成されたものです。
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-