script_resample.m

来自「图像插值程序」· M 代码 · 共 19 行

A=imread('d:\\cameraman.tif'); 
figure(1);
Imagesc(A,[0,255]);
colormap(gray);
[height,width]=size(A);

C=resampling(width,height,320,240,A);
imwrite(C,'d:\\Down_Sampling.tif');
figure( 2);
Imagesc(C,[0,255]);
colormap(gray);

C=resampling(width,height,400,300,A);
imwrite(C,'d:\\Up_Sampling.tif');
figure( 3 );
Imagesc(C,[0,255]);
colormap(gray);

disp('end!');