sx.m

来自「MATLAB实现的图像缩小程序」· M 代码 · 共 53 行

% name : 图像的缩小
% author: NNU GHL
% Email: [e-mail]
% date : 08/03/27

clear all;
close all;
ImageA=imread('Mmt59.tif');

figure(1);
subplot(2,2,1);
imshow(ImageA)
title('原图像')

% 图像的缩小 
ImageC=zeros(283,283);
for m=1:140
   for n=1:140
          ImageC(m,n)=double(ImageA(m*2,n*2));
    end
end
figure(2);
subplot(1,2,1);
imshow(ImageA);
title('原图像')
subplot(1,2,2);
imshow(uint8(ImageC));
title('缩小后的图像')

%图像水平镜像
for k=1:283
	    for m=1:283
	        ImageD(k,m)=ImageA(k,284-m);
       end
   end
   figure(1);
   subplot(2,2,2);
   imshow(ImageD);
   title('图像水平镜像')
  
%图像垂直镜像
for k=1:283
	    for m=1:283
	        ImageE(k,m)=ImageA(284-k,m);
       end
   end
 figure(1);
 subplot(2,2,3);
 imshow(ImageE);
 title('图像垂直镜像')