« View all new features in
Mathematica
9
◄
previous
|
next
►
New in
Mathematica
9
›
Legends
Include Multiple Legends
In[1]:=
X
styles = Sequence @@ {Axes -> False, Boxed -> False, Mesh -> None, PlotRange -> {-50, 50}, ImageSize -> 400};
Use different legends for different features and place the legends in different locations.
In[2]:=
X
Plot3D[Re[Sin[x + I y]], {x, -2 Pi, Pi}, {y, -2 Pi, 2 Pi}, ClippingStyle -> {Orange, Blue}, Evaluate@styles, ColorFunction -> "AvocadoColors", PlotLegends -> {Placed[ BarLegend[Automatic, LabelStyle -> {14, GrayLevel[0.3]}], Right], Placed[SwatchLegend[{Blue, Orange}, {"> 50", "< -50"}, LegendMarkerSize -> Large, LegendMarkers -> Automatic, LabelStyle -> {Bold, 18, GrayLevel[0.3]}], Top]}]
Out[2]=