r - 寻找图像边界

Question

虽然我经常使用 R，但刚刚开始一个图像分析项目并且我正在使用 EBImage 包。我需要从圆形/椭圆形图像中收集大量数据。内置函数 computeFeatures 给出了最大和最小半径。但我需要它计算出的所有半径。

这是代码。我已经阅读了图像、阈值和填充。

actual.image = readImage("xxxx")
image = actual.image[,2070:4000]
image1 = thresh(image)
image1 = fillHull(image1)

由于图片中有多个物体，所以我使用了下面的标签

  image1 = bwlabel(image1)

我使用内置函数生成特征

  features = data.frame(computeFeatures(image1,image))

现在，computeFeatures 给出最大半径和最小半径。我需要它为我的分析计算的所有对象的所有半径。至少如果我得到所有对象的边界坐标，我可以通过其他代码计算半径。

我知道图像存储为矩阵，可以想出一种复杂的方法来找到边界，然后计算半径。但是，想知道是否有更优雅的方法？

Answer 1

您可以尝试提取每个对象 + 一些填充，并绘制每个对象的 x 和 y 轴强度分布图。强度分布只是行/列的总和，可以使用 R 中的 rowSums 和 colSums

进行计算

然后您可以通过将每个强度分布分成两半并计算最接近的最小值来找到它下降的位置。

也许一个例子可以帮助澄清问题:

希望这是有道理的