Create table of coordinates from contourplot of equations

Asked Dec 15 '21 at 01:22

Active Dec 15 '21 at 01:22

Viewed 56 times

I have a plot that requires 3 curves. For the plot, [x] is a function of [v].

For each of the curves, I need to find the average [x] value and the average [v] value.

I figured out how to create the plot, but I have no idea how to extract the coordinates so I can get the average. I included the code from mathematical for one of the plots and the generated plot.

p3 = ContourPlot[{v^2/2 + 
     1.01/(1.01 - 1) ((0.7/(v x^2))^(1.01 - 1) - 1) == 1/x, 
   v^2/2 + 1.01/(1.01 - 1) ((1.092/(v x^2))^(1.01 - 1) - 1) == 1/x, 
   v^2/2 + 1.01/(1.01 - 1) ((1.3/(v x^2))^(1.01 - 1) - 1) == 1/x}, {x,
    0.2, 2}, {v, 0.2, 2.5}, 
  PlotLegends -> 
   Placed[{"\[Lambda]<\[Lambda]c", "\[Lambda]=\[Lambda]c", 
     "\[Lambda]>\[Lambda]c"}, {0.8, 0.5}], 
  PlotLabel -> Style["\[Gamma]=1.01", Blue, 20], 
  AspectRatio -> Automatic]

asked Dec 15 '21 at 01:22

Due Process

Try this: Cases[Normal@ p3, Line[pts_] :> pts, All] – MarcoB Dec 15 '21 at 02:11
What is the average of a curve? Do you mean RegionCentroid? – cvgmt Dec 15 '21 at 02:21
Crossposted here. – Rohit Namjoshi Dec 15 '21 at 02:24
1

Cases[Normal@p3, Line[pts_] :> Mean[pts], All]? – kglr Dec 15 '21 at 04:04
@MarcoB yes! that worked! now is there anyway to find the average X value and V value from the coordinates? – Due Process Dec 15 '21 at 07:26

Create table of coordinates from contourplot of equations

0 Answers0