9

Space for the legend is available at the upper left ListPlot[{ {2, 5, 2, 8, 6, 8, 3}, {1, 2, 5, 2, 3, 4, 3}}, PlotMarkers -> {"✶", 15}, Joined -> True, PlotStyle -> {Orange, Green}, PlotLegends -> Placed[ LineLegend[{"line1", "line2"}, LegendFunction -> "Frame"], {.15, .8}], Frame -&...


8

You did not put any location for Placed ListPlot[{{2, 5, 2, 8, 6, 8, 3}, {1, 2, 5, 2, 3, 4, 3}}, PlotMarkers -> {"\[SixPointedStar]", 15}, Joined -> True, PlotStyle -> {Orange, Green}, PlotLegends -> Placed[LineLegend[{"line1", "line2"}, LegendFunction -> (Framed[#, FrameMargins -> 0] &)], {0.1, 0.5}...


6

Often these graphics commands are a bit obscure and one has to try. Is the following approx. what you are looking for?: ListPlot[{{2, 5, 2, 8, 6, 8, 3}, {1, 2, 5, 2, 3, 4, 3}}, PlotMarkers -> {"\[SixPointedStar]", 15}, Joined -> True, PlotStyle -> {Orange, Green}, PlotLegends -> Placed[LineLegend[{"line1", "line2&...


5

plot = Plot[{Sin[x], Sin[2 x], Sin[3 x]}, {x, 0, 2 Pi}, PlotLegends -> "Expressions"]; You can post-process the output to replace legend labels with the desired strings: plot /. HoldPattern[p : HoldForm[_[a_]]] :> Row[{p, " -- This is for ", HoldForm @a}] SeedRandom[1] With[{ri = RandomInteger[{3, 7}]}, Plot[{Sin[x], Sin[ri ...


4

The pie-chart you mentioned consist of two data series: Image source extract inner circle values as List tempa = Values /@ Normal @ Values @ dsPie[Transpose] (*Out: {{0.188111, 0.0394984}, {0.495803, 0.0639874}, ...} *) Map Total on them to create outer circle: b = Total /@ tempa (*Out: {0.227609, 0.55979, 0.2126} *) Coloring inner circle pairs + ...


3

The same issue arises when we use CalloutMarker -> Arrowheads[Medium] or CalloutMarker -> Arrowheads[.02] in combination with Manipulate andImageSize -> Full. A simple fix is to use ImageSize -> Scaled[1] instead of ImageSize -> Full: Manipulate[Plot[Callout[x, "x", CalloutMarker -> "Arrow"], {x, 0, 1}, ImageSize ->...


3

VectorPlot3D[{x, y, z}, {x, -4, 4}, {y, -4, 4}, {z, -4, 4}, PlotLegends -> BarLegend[Automatic, LegendLabel -> "magnitude"]]


3

dsPie = Dataset[<| "Existing Customer" -> <| 3 -> 0.188111, "More3" -> 0.495803, "Less2incl" -> 0.155426|>, "Attrited Customer" -> <| 3 -> 0.0394984, "More3" -> 0.0639874, "Less2incl" -> 0.0571739|>|>]; dsPie[d |-&...


2

I'm late into this, but plot = Plot[..., PlotLegends -> {...}] Export["file.pdf", plot] works fine for me in v12. (C.E.'s answer of Save selection as... puts an "Out[#]" on the side). So exporting to a PDF file could be a solution if one does not want to rasterize.


Only top voted, non community-wiki answers of a minimum length are eligible