How to add the legend for one point on the plot

Question

Consider we want to add one point on the plot with some legend (see the question). How to add the separate legend for this point? How to add the legend for many points at the plot?

Thank you.

By legend, do you mean a text or a symbol? – Sumit Apr 18 '18 at 07:12 — Sumit, Apr 18 '18 at 07:12

score 2 · Accepted Answer · answered Apr 18 '18 at 07:43

2

You can use Epilog.

p1 = {Pi/2, 1}; txt1 = "Max";
p2 = {3 Pi/2, -1}; txt2 = "Min";
Plot[Sin[x], {x, 0, 2 Pi}, 
 Epilog -> {Point[p1], Text[txt1, p1 + {0, -0.1}], Point[p2], Text[txt2, p2 + {0, 0.1}]}]

answered Apr 18 '18 at 07:43

Sumit

15,912
2
31
73

score 1 · Answer 2 · answered Apr 18 '18 at 10:36

From the documentation, this could be a starting point by using Callout:

Plot[{Callout[Log[x] Sin[x], "P1", {2, Log[2] Sin[2]}, 
LabelStyle -> Directive[Bold, Italic], FrameMargins -> 7, 
CalloutMarker -> "CirclePoint", Appearance -> "Leader"], 
Callout[Log[x] Sin[x], "P2", {5, Log[5] Sin[5]}, 
LabelStyle -> Directive[Bold, Italic], FrameMargins -> 7, 
CalloutMarker -> "CirclePoint", Appearance -> "Leader"]}, {x, 0, 
2 \[Pi]}, PlotRange -> {-2, 1}]

How to add the legend for one point on the plot

2 Answers2