matlab图像缩放算法

㈠ matlab 如何将图像缩放到指定像素大小的函数

1、首先打开电脑，然后在电脑中找到并打开matlab软件主界面，如图所示。

㈡ MATLAB图像基本相关函数（关于缩放）

t1
=
maketform('affine',[2
0
0;
0
1
0;
0
0
1]);%横向放2倍。如果想缩2倍就把2改为0.5即可，即变为0.5倍
t2
=
maketform('affine',[1
0
0;
0
2
0;
0
0
1]);%纵向放2倍。如果想缩2倍就把2改为0.5即可，即变为0.5倍
t3
=
maketform('affine',[4/5
0
0;
0
3/5
0;
0
0
1]);%横向4/5，纵向3/5
i
=
imread('cameraman.tif');
i1
=
imtransform(i,t1);
i2
=
imtransform(i,t2);
i3
=
imtransform(i,t3);
imshow(i),
figure,
imshow(i1),
figure,
imshow(i2),
figure,
imshow(i3)

㈢ 如何用MATLAB对图片进行缩放

MATLAB是美国MathWorks公司出品的商业数学软件，用于算法开发、数据可视化、数据分析以及数值计算的高级技术计算语言和交互式环境。

MATLAB和Mathematica、Maple并称为三大数学软件。它在数学类科技应用软件中在数值计算方面首屈一指。无论是做项目还是写论文，我们都会遇到把Matlab画的图形(默认为matlab自带的图像格式.fig)转换为其他格式并导出的问题。

用的最多的图片格式是eps格式(用latex编辑时用)和jpg（用word编辑时用）。下面以matlab 2011b为例介绍多种缩放方法。

㈣ 怎么用MATLAB掌握图像平移、图像旋转和图像缩放的基本原理与实现方法

%图像平移(1)
F=imread('p2.bmp');
se = translate(strel(1), [0 20]);
%参数[0 20]可以修改，修改后平移距离对应改变
J = imdilate(F,se);
figure;
imshow(J,[]);title('右移后图形');

%图像平移(2)
function outImage=immove(inImage,Tx,Ty)
[m, n] = size(inImage);
Tx=fix(Tx);
Ty=fix(Ty);

%move x
if (Tx<0)
inImage=imcrop(inImage,[abs(Tx),1,m-abs(Tx),n]);
[m, n] = size(inImage);
Tx=0;
end

%move y
if (Ty<0)
inImage=imcrop(inImage,[1,abs(Ty),m,n-abs(Ty)]);
[m, n] = size(inImage);
Ty=0;
end

outImage = zeros(m+Ty, n+Tx);
outImage(1+Ty:m+Ty,1+Tx:n+Tx) = inImage;

%图像旋转
%X,Y为其行列数
Image=imread('02.jpg');
Image=rgb2gray(Image);
angle=30;
%角度任意的一个数 表示30度
pai=3.14;
Angle=pai*angle/180;
%转换一下角度的表示方法。
[X,Y]=size(Image);

%原图显示
subplot(2,1,1);
imshow(Image);
title('原图像');

%计算四个角点的新坐标，确定旋转后的显示区域
LeftTop(1,1)=-(Y-1)*sin(Angle);
LeftTop(1,2)=(Y-1)*cos(Angle);

LeftBottom(1,1)=0;
LeftBottom(1,2)=0;

RightTop(1,1)=(X-1)*cos(Angle)-(Y-1)*sin(Angle);
RightTop(1,2)=(X-1)*sin(Angle)+(Y-1)*cos(Angle);

RightBottom(1,1)=(X-1)*cos(Angle);
RightBottom(1,2)=(X-1)*sin(Angle);

%计算显示区域的行列数
Xnew=max([LeftTop(1,1),LeftBottom(1,1),RightTop(1,1),RightBottom(1,1)])-min([LeftTop(1,1),LeftBottom(1,1),RightTop(1,1),RightBottom(1,1)]);
Ynew=max([LeftTop(1,2),LeftBottom(1,2),RightTop(1,2),RightBottom(1,2)])-min([LeftTop(1,2),LeftBottom(1,2),RightTop(1,2),RightBottom(1,2)]);

% 分配新显示区域矩阵
ImageNew=zeros(round(Xnew),round(Ynew))+255;

%计算原图像各像素的新坐标
for indexX=0:(X-1)
for indexY=0:(Y-1)
ImageNew(round(indexX*cos(Angle)-indexY*sin(Angle))+round(abs(min([LeftTop(1,1),LeftBottom(1,1),RightTop(1,1),RightBottom(1,1)])))+1,1+round(indexX*sin(Angle)+indexY*cos(Angle))+round(abs(min([LeftTop(1,2),LeftBottom(1,2),RightTop(1,2),RightBottom(1,2)]))))=Image(indexX+1,indexY+1);
end
end

%显示
subplot(2,1,2);
imshow((ImageNew)/255)
promp=['旋转角度为：' int2str(angle) '的图像']
title(promp);

%图像缩放
function y=resize(a,mul,type)
%****************************************************
%a:输入图像灰度值
%mul:缩放倍数
%type:1表示最邻近法，2表示双极性插值法
%画出缩放后图像并返回其灰度值
%****************************************************
[m,n]=size(a);
m1=m*mul;n1=n*mul;
%****************************************************
if type==1
for i=1:m1
for j=1:n1;
b(i,j)=a(round(i/mul),round(j/mul));
end
end
elseif type==2
for i=1:m1-1
for j=1:n1-1;
u0=i/mul;v0=j/mul;
u=round(u0);v=round(v0);
s=u0-u;t=v0-v;
b(i,j)=(a(u+1,v)-a(u,v))*s+(a(u,v+1)-a(u,v))*t+(a(u+1,v+1)+a(u,v)-a(u,v+1)-a(u+1,v))*s*t+a(u,v);
end
end
end
%*****************************************************
b=uint8(b);
imshow(b);
title('处理后图像');
y=b;

㈤ 求高手用MATLAB对图片进行缩放

imo=imread('test.png');%读取
s=2;%缩放倍数，缩放后与原始大小的比值
figure(1)
imshow(imo);%原图显示
[m n d]=size(imo);
if s<=1 & s>0
for i=1:d
im(:,:,i)=imo(round(1:1/s:m),round(1:1/s:n),i);
end
elseif s>1
[X Y]=meshgrid(1:n,1:m);
[Xt Yt]=meshgrid(1:1/s:n,1:1/s:m);
for i=1:d
im(:,:,i)=interp2(double(imo(:,:,i)),Xt,Yt,'spline');
end
if isa(imo,'uint8')
im=uint8(im);
else
im=uint16(im);
end
end
figure(2)
imshow(im);%缩放图显示

㈥ matlab图象缩放程序

你在matlab下使用help imresize就知道了，不要这么懒嘛

例子：
clear;
lena=imread('lena.tiff');

%以下三行指定缩放倍数为0.5，即长宽各变为原始图像的0.5倍，
%分别使用三种插值方法，即最近邻插值（默认）、双线性插值、双三次插值
lena0_5_1=imresize(lena,0.5);%
lena0_5_2=imresize(lena,0.5,'bilinear');
lena0_5_3=imresize(lena,0.5,'bicubic');
%以下三行指定缩放倍数为2，即长宽各变为原始图像的2倍，
%分别使用三种插值方法，即最近邻插值（默认）、双线性插值、双三次插值
lena2_1=imresize(lena,2);
lena2_2=imresize(lena,2,'bilinear');
lena2_3=imresize(lena,2,'bicubic');

%下面一行是另外一种方式给定缩放倍数的例子，即给出缩放后图像的行数和列数
lena2_1_0=imresize(lena,[256 512]);
imshow(lena2_1_0);

㈦ matlab 图像缩放

T1 = maketform('affine',[2 0 0; 0 1 0; 0 0 1]);%横向放2倍。如果想缩2倍就把2改为0.5即可，即变为0.5倍
T2 = maketform('affine',[1 0 0; 0 2 0; 0 0 1]);%纵向放2倍。如果想缩2倍就把2改为0.5即可，即变为0.5倍
T3 = maketform('affine',[4/5 0 0; 0 3/5 0; 0 0 1]);%横向4/5，纵向3/5
I = imread('cameraman.tif');
I1 = imtransform(I,T1);
I2 = imtransform(I,T2);
I3 = imtransform(I,T3);
imshow(I), figure, imshow(I1), figure, imshow(I2), figure, imshow(I3)

㈧ 怎么将matlab得到的图局部放大呀

1、首先画一个轨迹图像。

㈨ matlab 如何对一个波形进行线性缩放

%% 4.图像的缩放

% 思路：双线性插值
kV = 0.5; % 垂直缩放系数
kH = 0.5; % 水平缩放系数

% 读入图像
I = imread('D:\lena.bmp'); % 注意修改文件路径
II = double(I);

[m, n, r]=size(II);
OI=zeros(m*kV,n*kH, r);
rot=[kV 0 0;0 kH 0;0 0 1]; % 变换矩阵

for k=1:r
for i=1:m*kV
for j=1:n*kH
pix=[i j 1]/rot;
Y =pix(1)-floor(pix(1));
X =pix(2)-floor(pix(2));
% 边界处理
if pix(1) < 1
pix(1) = 1;
end
if pix(1) > m
pix(1) = m;
end
if pix(2) < 1
pix(2) = 1;
end
if pix(2) > n
pix(2) =n;
end
% 四个邻点
pix1 = [floor(pix(1))floor(pix(2))];
pix2 = [floor(pix(1))ceil(pix(2))];
pix3 = [ceil(pix(1))floor(pix(2))];
pix4 = [ceil(pix(1))ceil(pix(2))];
% 计算临近四个点的权重
w1 = (1-X)*(1-Y);
w2 = X*(1-Y);
w3 = (1-X)*Y;
w4 = X*Y;
% 按权重进行双线性插值
OI(i,j,k)=...
w1*II(pix1(1),pix1(2),k)+ ...
w2*II(pix2(1),pix2(2),k)+ ...
w3*II(pix3(1),pix3(2),k)+ ...
w4*II(pix4(1),pix4(2),k);
end
end
end
figure, imshow(uint8(II)), title('原图')
figure, imshow(uint8(OI)), title('缩放后')

㈩ 如何用MATLAB编写一个双线性插值的算法,用来放大缩小图象

%% 4.图像的缩放

% 思路：双线性插值
kV = 0.5; % 垂直缩放系数
kH = 0.5; % 水平缩放系数

% 读入图像
I = imread('D:\lena.bmp'); % 注意修改文件路径
II = double(I);

[m, n, r]=size(II);
OI=zeros(m*kV,n*kH, r);
rot=[kV 0 0;0 kH 0;0 0 1]; % 变换矩阵

for k=1:r
for i=1:m*kV
for j=1:n*kH
pix=[i j 1]/rot;
Y =pix(1)-floor(pix(1));
X =pix(2)-floor(pix(2));
% 边界处理
if pix(1) < 1
pix(1) = 1;
end
if pix(1) > m
pix(1) = m;
end
if pix(2) < 1
pix(2) = 1;
end
if pix(2) > n
pix(2) =n;
end
% 四个邻点
pix1 = [floor(pix(1))floor(pix(2))];
pix2 = [floor(pix(1))ceil(pix(2))];
pix3 = [ceil(pix(1))floor(pix(2))];
pix4 = [ceil(pix(1))ceil(pix(2))];
% 计算临近四个点的权重
w1 = (1-X)*(1-Y);
w2 = X*(1-Y);
w3 = (1-X)*Y;
w4 = X*Y;
% 按权重进行双线性插值
OI(i,j,k)=...
w1*II(pix1(1),pix1(2),k)+ ...
w2*II(pix2(1),pix2(2),k)+ ...
w3*II(pix3(1),pix3(2),k)+ ...
w4*II(pix4(1),pix4(2),k);
end
end
end
figure, imshow(uint8(II)), title('原图')
figure, imshow(uint8(OI)), title('缩放后')