Welcome to our community

Be a part of something great, join today!

[SOLVED] point markings in mathematica

dwsmith

Well-known member
Feb 1, 2012
1,673
How can I label the intersection of the dashed and thick plots?

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}]
Solved
 
Last edited: