- Thread starter
- #1
How can I label the intersection of the dashed and thick plots?
Solved
Code:
<< PlotLegends';PlotOne = Plot[2, {x, 0, 3}, PlotStyle -> {Dashed}];
PlotTwo = Plot[1, {x, 0, 3}, PlotStyle -> {Thick}];
<< Graphics`ImplicitPlot`;
ImplicitPlotOne =
ImplicitPlot[x == 1, {x, 0, 3}, {y, 0, 3}, PlotStyle -> {Dashed}];
ImplicitPlotTwo =
ImplicitPlot[x == 2, {x, 0, 3}, {y, 0, 3}, PlotStyle -> {Thick}];
Show[PlotOne, PlotTwo, ImplicitPlotOne, ImplicitPlotTwo,
AxesLabel -> {N, P}]
Last edited: