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

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

% 读入原始图像
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` 命令，以便在原图像上绘制选取的连通域。另外，为了方便显示，将原图像和结果放在了一张图中。