clc,clear,close all;
%读取图片将其存为元胞数组 for num=1:2 for i=0:18 if i<10 I{i+1}=imread(".\附件"+num2str(num)+"\00"+num2str(i)+".bmp"); else I{i+1}=imread(".\附件"+num2str(num)+"\0"+num2str(i)+".bmp"); end end %找第一张图片 [m n]=size(I{1}); Z=ones(m,1)*255; for i=1:19 if I{i}(:,1)==Z index_start=i; end end pic=zeros(1,19); pic(1)=index_start; %根据相关系数找到正确排序 for i=1:18 for j=1:19 if ismember(j,pic) rel(j)=0; else x=I{pic(i)}(:,n); y=I{j}(:,1); r1=sum((x-mean(x)).*(y-mean(y))); r2=sqrt(sum((x-mean(x)).^2))*sqrt(sum((y-mean(y)).^2)); r=r1/r2; rel(j) = r; end end [~, idx] = max(rel); pic(i+1)=idx; end %拼接图片 fig=[]; for ii=1:19 fig=[fig,I{pic(ii)}]; end figure(num) imshow(fig) end


免责声明:本文系网络转载或改编,未找到原创作者,版权归原作者所有。如涉及版权,请联系删