2

I have a list of data points. From this list I generate a plot using ListCountourPlot. Mathematica interpolates multiple Countour lines.

I want to extract the points $(d,b)$ for a specific line which is the line $\omega_i = 0$ (red line).

How can I do that?

figure

Mathematica code:

j132 = Import["/home/mateus/Desktop/LaminarSeparationBubble/para_loop_20.dat"];

newStyle[x_] := x /. l_Line :> Sequence[Opacity[1], Thick, Red, l]

lista131 = 
  Table[{j132[[i, 2]], j132[[i, 1]], j132[[i, 9]]}, {i, 1, 
    Length[j132]}];

ListContourPlot[lista131, PlotLegends -> Automatic, Contours -> 30, 
  FrameLabel -> {"b", "d", "ωi"}, PlotRange -> All, 
  ImageSize -> 400] /. Tooltip[x_, 0] :> Tooltip[newStyle[x], 0]
MarcoB
  • 67,153
  • 18
  • 91
  • 189
Mateus
  • 1,243
  • 7
  • 14

1 Answers1

1

I am not sure that I understand, but it seems to me that you already have a method to isolate the Line element corresponding to that contour line. In fact, you do that in your newStyle function.

Try:

Cases[
  Normal@ListContourPlot[lista131, Contours -> {{0}}],
  Tooltip[x_, 0] :> Cases[x, l_Line :> l[[1]]], Infinity
]
MarcoB
  • 67,153
  • 18
  • 91
  • 189