Date: Apr 25, 2013 2:51 AM
Author: Bob Hanlon
Subject: Re: Converting a magnified image of a line to a single
>From Details and Options section of documentation page for SelectComponents
"For the complete list of possible properties, see the reference page for
The link in this sentence for ComponentMeasurements goes to
with the properties listed under Details and Options.
On Wed, Apr 24, 2013 at 7:01 AM, Joerg Roesgen <email@example.com>wrote:
> This command SelectComponents has the form
> SelectComponents[m,"prop",crit]. I can't find any list of properties
> corresponding to "prop." Any ideas?
> On Apr 20, 2013, at 05:41 , Dave Waddell wrote:
> > I tried converting the result image to a graph so that I could apply a
> > moving average and then fit a B-spline through it. As you can tell I'm
> > to Mathematica:
> > data = ArrayRules@SparseArray@ImageData[result]
> > It was all downhill after that. Another nudge would be appreciated.
> > Thanks, Dave.
> > Dave,
> > On 4/17/13 1:30 AM, Dave Waddell wrote:
> >> I have a magnified image of a 0.1mm line here:
> >> http://www.d-a-v-e.org/images/Trace.jpg
> >> ... this converts with Binarize very well:
> >> http://www.d-a-v-e.org/images/Trace%20binary.jpg
> >> ... but what I would like to do is convert it to a single pixel wide
> > smoothed line running right up the middle. Any suggestions or pointers on
> > how to do this in Mathematica would be appreciated.
> >> Dave
> > The sequence below seems like a good start.
> > The documentation for the functions should help you understand what is
> > on in more details:
> > trace = Import["http://www.d-a-v-e.org/images/Trace.jpg"]
> > b = ColorNegate@Binarize[trace];
> > b2 = SelectComponents[b, "Area", -1];
> > b3 = FillingTransform@b2;
> > dt = ImageAdjust@DistanceTransform@b3;
> > result = ColorNegate@Image[WatershedComponents[dt], "Bit"];
> > HighlightImage[trace, result]
> > Matthias Odisio
> > Wolfram Research