将选取的连通域边缘显示在原图上

好的，以下是可以在原图上显示选取的连通域边缘的MATLAB代码：

% 读入原始图像
I = imread('D:\课设图片\1.jpg');

% 对图像进行二值化处理
I1 = im2bw(I, 0.6);

% 对二值化后的图像进行形态学处理
se = strel('disk', 5);
I2 = imclose(I1, se);
I3 = imopen(I2, se);
I4 = imopen(I3, se);

% 对处理后的图像进行连通域分析
L = bwlabel(I4);
STATS = regionprops(L, 'all');

% 筛选面积在1500到4800的连通域
for i = 1:length(STATS)
    if (STATS(i).Area < 1500 || STATS(i).Area > 4800)
        L(L == i) = 0;
    end
end

% 在原图上显示选取的连通域边缘
BW = edge(L, 'Canny');
RGB = imoverlay(I, BW, [1 0 0]);
imshow(RGB);

这段代码与前面提到的代码类似，只是最后使用edge函数生成选取的连通域边缘的二值图像，然后使用imoverlay函数将二值图像与原图叠加，将边缘显示为红色。这样，就可以在原图上清晰地看到选取的连通域边缘了。

相关问题

在原图像中将选取的连通域框选出来

好的，我稍微修改一下之前的代码，增加在原图像中将选取的连通域框选出来的功能。修改后的代码如下：

% 读入原始图像
I = imread('D:\课设图片\1.jpg');

% 对图像进行二值化处理
I1 = im2bw(I, 0.6);

% 对二值化后的图像进行形态学处理
se = strel('disk', 5);
I2 = imclose(I1, se);
I3 = imopen(I2, se);
I4 = imopen(I3, se);

% 对处理后的图像进行连通域分析
L = bwlabel(I4);
STATS = regionprops(L, 'all');

% 选取面积在 2000 到 3800 之间的连通域，并在原图像中框选出来
S = size(I, 1) * (size(I, 2) * 0.85 - size(I, 2) / 10) * (size(I, 1) * 2 / 3 - size(I, 1) / 4);
figure;
imshow(I);
hold on;
for i = 1:length(STATS)
    area = STATS(i).ConvexArea;
    if area >= 2000 && area <= 3800
        bbox = STATS(i).BoundingBox;
        rectangle('Position', bbox, 'EdgeColor', 'r');
    end
end
title('在原图像中框选选取的连通域');

这份代码的主要修改是增加了 `figure` 和 `hold on` 命令，以便在原图像上绘制选取的连通域。另外，为了方便显示，将原图像和结果放在了一张图中。

改进代码，直接在原图像显示所选连通域边缘

好的，我可以帮您修改代码，让它可以直接在原图像上显示所选连通域的边缘。以下是一份可能实现该功能的 MATLAB 代码：

% 读入原始图像
I = imread('D:\课设图片\1.jpg');

% 对图像进行二值化处理
I1 = im2bw(I, 0.6);

% 对二值化后的图像进行形态学处理
se = strel('disk', 5);
I2 = imclose(I1, se);
I3 = imopen(I2, se);
I4 = imopen(I3, se);

% 对处理后的图像进行连通域分析
L = bwlabel(I4);
STATS = regionprops(L, 'all');

% 选取面积在 2000 到 3800 之间的连通域，并在原图像中显示其边缘
S = size(I, 1) * (size(I, 2) * 0.85 - size(I, 2) / 10) * (size(I, 1) * 2 / 3 - size(I, 1) / 4);
figure;
imshow(I);
hold on;
for i = 1:length(STATS)
    area = STATS(i).ConvexArea;
    if area >= 2000 && area <= 3800
        bbox = STATS(i).BoundingBox;
        rectangle('Position', bbox, 'EdgeColor', 'r');
        boundary = bwtraceboundary(I4, [round(bbox(2)), round(bbox(1))], 'N');
        plot(boundary(:,2), boundary(:,1), 'g', 'LineWidth', 2);
    end
end
title('在原图像中显示选取的连通域边缘');

这份代码的主要修改是增加了 `bwtraceboundary` 命令，用于在原图像中显示所选连通域的边缘。另外，为了方便显示，将原图像和结果放在了一张图中。需要注意的是，这份代码中的特定面积范围是根据之前的回答中给出的信息来确定的，如果需要调整特定面积范围，可以修改代码中的 `area >= 2000 && area <= 3800` 条件语句。