灰度图像二值化方法matlab代码.doc

《灰度图像二值化方法matlab代码.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、OTSU算法代码：I=imread('****');th=graythresh(I);J=im2bw(I,th);subplot(121)imshow(I);subplot(122)imshow(J);Bernsen算法代码：clc;clearallcloseallI=imread('****');[m,n]=size(I);I_gray=double(I);T=zeros(m,n);M=3;N=3;fori=M+1:m-Mforj=N+1:n-Nmax=1;min=255;fork=i-M:i

2、+Mforl=j-N:j+NifI_gray(k,l)>maxmax=I_gray(k,l);endifI_gray(k,l)T(i,j)I_bw(i,j)=255;elseI_bw(i,j)=0;endendendsubplot(121),imshow(I);subplot(122),imsho

3、w(I_bw);改进的Bernsen算法代码：clc;clearallcloseallI=imread('****');I_gray=double(I);[m,n]=size(I);a=0.3;A=0;T1=0;S=0;fori=1:mforj=1:nA=A+I_gray(i,j);endendA=A*0.9;while(S

4、;T3=zeros(m,n);M=3;N=3;4fori=M+1:m-Mforj=N+1:n-Nmax=1;min=255;fork=i-M:i+Mforl=j-N:j+NifI_gray(k,l)>maxmax=I_gray(k,l);endifI_gray(k,l)

5、s(m,n);fori=1:mforj=1:nifI_gray(i,j)>(1+a)*T1I_bw(i,j)=255;endifI_gray(i,j)<(1-a)*T1I_bw(i,j)=0;endif(1-a)*T1<=I_gray(i,j)<=(1-a)*T1ifT3(i,j)>a*T1ifI_gray(i,j)>=T4(i,j)I_bw(i,j)=255;elseI_bw(i,j)=0;endelseifI_gray(i,j)>=T5(i,j)I_bw(i,j)=255;elseI_bw(

6、i,j)=0;end4endendendendsubplot(121),imshow(I);subplot(122),imshow(I_bw);4