The Image presented is created by Mathematica
ListPLot. It's a list of points out of a 512x512 grid, which meets criteria. I would like to be able to identify the points that make the contour, inside and outside, of the green "ears". Then with these points identified, average over the two contours and have a line that draws the shape. I'm not sure if this can be done in Mathematica and if it can, how to implement it. Any help would be appreciated
Update Another option would be to use a more restrictive criterion, which gives a plot like this.
Is there a way to make Mathematica connect the points and/or make a list of these points?