How to get a smooth ridge from a binary image

Question

I always have this demand,but Mathematica cannot implement this perfectly for me.For example,I have such binary image

binImg = Uncompress[FromCharacterCode[
     Flatten[ImageData[Import["https://i.stack.imgur.com/9mJL2.png"],"Byte"]]]]
BinaryImageQ[binImg]

True

I want to get a smooth ridge as far as possible.This is current method I can think out.

Pruning[Thinning[binImg], 10]

Mathematica graphics

Of course,the SkeletonTransform can provide a little bit better result.But I have to say there is a long way to go.I mean I hope to get a result,the line more like a line,a rectangle more like a rectangle,a circle more like a circle in the result ridge image.In my case,I hope the result will more close to following red commponent.

Maybe something like ImageAdjust[binImg~Blur~12~Erosion~6~RidgeFilter~1] — Simon Woods, Jul 04 '17 at 10:11
@SimonWoods And you don't intend to post it as a answer?That will be a wonderful start I think. — yode, Jul 04 '17 at 10:18
I don't know Mathematica, but morphological processing (successive dilation and erosion) will go a long way. — Sanchises, Jul 04 '17 at 17:47

score 19 · Answer 1 · answered Jul 04 '17 at 10:42

19

You could try some kind of blurring or low-pass filter to smooth out some of the irregularity. For example

ImageAdjust[binImg ~Blur~ 12 ~Erosion~ 6 ~RidgeFilter~ 1]

answered Jul 04 '17 at 10:42

Simon Woods

84,945
8
175
324

I always think the upvote is a mysterious thing.Anyway,that include my one. :) – yode Jul 06 '17 at 11:16

score 5 · Answer 2 · answered Jul 06 '17 at 11:13

5

Almost

Thinning@SkeletonTransform@Binarize[Blur[binImg, 10], Method -> "Entropy"]

Mathematica graphics

answered Jul 06 '17 at 11:13

yode

26,686
4
62
167

How to get a smooth ridge from a binary image

2 Answers2

Linked

Related