小波矩特征提取matlab 代码分类:Image RecognitionMatlab 2010-12-10 10:00 122人阅读 评论(0) 收藏 举报这是我上研究生时写的小波矩特征提取代码:%新归一化方法小波矩特征提取---------------------------------------------------------- F=imread('a1.bmp'); F=im2bw(F); F=imresize(F,[128 128]); %求取最上点for i=1:128 for j=1:128 if (F(i,j)==1) ytop=i; xtop=j; break; end end if(F(i,j)==1) break; end end %求取最下点for i=1:128 for j=1:128 if (F(129-i,j)==1) ybottom=129-i; xbottom=j; break; end end if(F(129-i,j)==1) break; end end %求取最左点for i=1:128 for j=1:128 if (F(j,i)==1) yleft=j; xleft=i; break; end end if(F(j,i)==1) break; end end %求取最右点for i=1:128 for j=1:128 if (F(j,129-i)==1) yright=j; xright=129-i; break; end end if(F(j,129-i)==1) break; end end %求取中心点x0=(xright-xleft)/2+xleft; y0=(ybottom-ytop)/2+ytop; x0=round(x0); y0=round(y0); %图像平移F=double(F); [M,N]=size(F); F1=zeros(M,N); M0=M/2; N0=N/2; for i=1:M for j=1:N if F(i,j)==1 F1(i+M0-y0,j+N0-x0)=1; end end end %figure,imshow(F1); %图像缩放max=0; for i=1:128 for j=1:128 if(F(i,j)==1) d=sqrt((i-y0)^2+(j-x0)^2); if(max