[問題] 影像偵測問題已回收

看板MATLAB作者tkisky (FlyToast)時間17年前 (2008/10/27 15:31)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串1/1

http://www.badongo.com/file/11853850 最近看了這篇論文想照著上面的方法做做看不過出來的結果感覺出來就是很奇怪以下是我的code --------------------- s = imread('111.jpg'); r = s(:,:,1); g = s(:,:,2); b = s(:,:,3); r_mean = mean(r); size_img = size(s); % 條件10 for x = 1:size_img(1) for y = 1:size_img(2) if r(x,y) > r_mean op1(x,y) = 255; else op1(x,y) = 0; end end end op1 = uint8(op1); imwrite(op1,'op1.tif') %條件12 for x = 1:size_img(1) for y = 1:size_img(2) if r(x,y) > g(x,y) > b(x,y) op2(x,y) = 255; else op2(x,y) = 0; end end end op2 = uint8(op2); imwrite(op2,'op2.tif') %條件13 for x = 1:size_img(1) for y = 1:size_img(2) if g(x,y)/(r(x,y)+1)>=0.25 && g(x,y)/(r(x,y)+1)<=0.65 && b(x,y)/(r(x,y)+1)>=0.05 && b(x,y)/(r(x,y)+1)<=0.45 && b(x,y)/(g(x,y)+1)>=0.2 && b(x,y)/(g(x,y)+1)<=0.6 op3(x,y) = 255; else op3(x,y) = 0; end end end op3 = uint8(op3); imwrite(op3,'op3.tif') imwrite(op3,'op3.jpg','quality',80) %總整 for x = 1:size_img(1) for y = 1:size_img(2) if op1(x,y) == op2(x,y) == op3(x,y) == 255 op4(x,y) = 255; else op4(x,y) = 0; end end end op4 = uint8(op4); %imwrite(op4,'op4.tif') --------------------- 想請問版上的大大我所寫的程式那裡需要改的謝謝大家 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 163.17.136.141