怎么修改代码可以循环保存在原图上画直线的图片?请大家指点一下!

clear
clc
%%%%一系列的处理
。。。。。
%提取线段信息
lines=houghlines(I1,T1,R1,Peaks,'fillgap',20,'minlength',90);
figure,imshow(I),hold on %I是原图
%绘制线段
for k=1:length(lines)
xy=[lines(k).point1;lines(k).point2];
plot(xy(:,1),xy(:,2),'LineWidth',1,'Color','green');
end

[H2,T2,R2] = hough(I1,'Theta',-25:0.01:-20);
%求极值点
Peaks=houghpeaks(H2,1,'threshold',ceil(0.5*max(H2(:))));

%得到线段信息
lines=houghlines(I1,T2,R2,Peaks,'fillgap',20,'minlength',280);

%绘制线段
for k=1:length(lines)
    xy=[lines(k).point1;lines(k).point2];
    plot(xy(:,1),xy(:,2),'LineWidth',1,'Color','green');
end
hold off
f=getframe(gcf);
imwrite(f.cdata,[str2,num2str(k),'.jpg']);
close

end

目前循环能够实现,但是保存时只能保存当前窗口的一张,达不到循环保存的作用。

1个回答

%绘制线段
for k=1:length(lines)
xy=[lines(k).point1;lines(k).point2];
plot(xy(:,1),xy(:,2),'LineWidth',1,'Color','green');
f=getframe(gcf);
imwrite(f.cdata,[str2,num2str(k),'.jpg']);
end
hold off
close

u011371225
KangFeng2016 回复东 木: 检查你的文件名是不是每个循环里都一样,加断点,调试
大约一年之前 回复
dongmucy
东 木 这个我也试过了,还是不行。还是不能循环保存。
大约一年之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问
相关内容推荐