r - 使用 EBImage 包将 RGB 图像转换为 R 中的二进制图像

Question

我需要将rgb图像转换为二进制图像，以便我可以使用bwlabel()函数来检测R中图像中的对象数量。我刚刚开始进行图像处理，所以我不知道该怎么做。我正在使用 EBImage 包。

谁能帮我解决这个问题吗？

谢谢

Answer 1

包含包中 lenac 图像的示例:

lenac = readImage(system.file("images", "lena-color.png", package="EBImage"))
lena = channel(lenac, "gray")
lena5 = lena > 0.5
labels = bwlabel(lena5)
max(labels)

给出了 lena 图片中的 770 个物体。由于这是一张人脸的图片，将其划分为对象可能没有多大意义。尝试不同的阈值，直到获得合理的结果 - 这取决于您正在使用的图像类型。