一、简介
二、源代码
clear,clc,close all;
Image=imread('butterfly.bmp');
Back=imread('IMG3_13.jpg');
subplot(131),imshow(Image),title('蝴蝶');
subplot(132),imshow(Back),title('背景');
[h w c]=size(Back);
population=20;
num=3;
for k=1:population
type=randi(6,1,num);
NewImage=Image;
for n=1:num
switch type(n)
case 1 %scale
scale=rand();
NewImage=imresize(NewImage,scale,'bilinear');
Image=im2double(imread('lotus.jpg')); %读取图像并转换为double型
[h,w,c]=size(Image); %获取图像尺寸
NewImage=ones(h,w,c); %新图像初始化
deltax=20;deltay=20;
for x=1:w
for y=1:h %循环扫描新图像中点
oldx=x-deltax;
oldy=y-deltay; %确定新图像中点在原图中的对应点
if oldx>0 && oldx<w && oldy>0 && oldy<h %判断对应点是否在图像内
NewImage(y,x,:)=Image(oldy,oldx,:); %赋值
end
end
end
Image=imread('lotus.jpg');
deltax=20;deltay=20;
T=maketform('affine',[1 0 0;0 1 0;deltax deltay 1]);
NewImage1=imtransform(Image,T,'XData',[1 size(Image,2)],'YData',[1,size(Image,1)],'FillValue',255);
NewImage2=imtransform(Image,T,'XData',[1 size(Image,2)+deltax],'YData',[1,size(Image,1)+deltay],'FillValue',255);
subplot(131),imshow(Image),title('原图');
subplot(221),imshow(Image2);
subplot(222),imshow(HImage);
subplot(223),imshow(VImage);
subplot(224),imshow(CImage);
Image=im2double(imread('lotus.jpg'));
tform1=maketform('affine',[1 0 0;0.5 1 0; 0 0 1]);
tform2=maketform('affine',[1 0.5 0;0 1 0; 0 0 1]);
NewImage1=imtransform(Image,tform1);
NewImage2=imtransform(Image,tform2);
Back=imread('desert.jpg');
Foreground=imread('car.jpg');
result1=imadd(Foreground,-100);
result2=imadd(Back,Foreground);
result3=imadd(Back,result1);
imwrite(result1,'jiabiaoliang.jpg');
imwrite(result2,'jiabeijing.jpg');
imwrite(result3,'jiabiaoliangjiabeijing.jpg');
三、运行结果
四、备注
版本：2014a
