这篇博客来源于 Stack-Exchange,但这个计数问题就很简单了,物体之间无粘连,基本上
一个函数就能解决,这里主要学习如何快速实现标记。为方便理解,这里把原代码作了一下拆分。
图片如下,
附上代码以及结果,
img = Import["C:/Users/USER/Desktop/gz.jpg"] data = Values[ ComponentMeasurements[FillingTransform[ChanVeseBinarize[img]], "Centroid"]]; number = data // MapIndexed[Inset[Style[First@#2, 18, Yellow], num = #1] &, #] &; Show[img, Graphics[{number, Opacity[.6], Red, Disk[num, 20]}]]
最后作一点说明,图中有红色标记的瓜子表示最后一粒瓜子,代码中用num最终的赋值标记,而这恰好就是
最后一粒瓜子。