Matlab 制作常用图片的代码

本文汇总了笔者常用的MATLAB制作图片的代码，包括单色图片，过渡图，连续255张图片，棋盘格，Hline，相比手动画图，能够提高些效率。仅供参考，如果有更优的方法，欢迎讨论。

1.单色图片：

clear 
clc
row = 3200; #定义像素大小
col = 1440;
img = zeros(row,col,3,'uint8');  #创建黑色图
img(:,:,1)=uint8(255);  #R
img(:,:,2)=uint8(255);  #G
img(:,:,3)=uint8(255);  #B
end
filename=['C:\Users\user\Desktop\','RGtrans','.png']; #添加文件路径，没有添加就默认桌面了
imwrite(img,filename)

上面的代码会生成一张3200*1440的白色图。其中，生成图片的像素大小和颜色，都可以自己在对应位置修改。

2.单色过渡图：

clear 
clc
row = 3200;
col = 1440;
img = zeros(row,col,3,'uint8');
 for i =900:1300
    img(i,:,1)=uint8(255*i/row);
    img(i,:,2)=uint8(255-255*i/row);
    img(i,:,3)=uint8(0);
 end
filename=['C:\Users\User\Desktop\','RGtrans','.png'];
imwrite(img,filename)

3.连续制作某种纯灰阶图片：

for G=0:1:255;
    row=3200;
    col=1440;
r=zeros(row,col,'uint8')+G; #R
g=zeros(row,col,'uint8')+G;
b=zeros(row,col,'uint8')+G;
x=cat(3,r,g,b);
filname=sprintf('W_%d.png',G);   %这里修改生成图片的名称
imwrite(x,filname)
end

最终生成的是白色0-255灰阶的图片。如果想生成其他颜色图片，可以自行调整RGB分量 

4.制作棋盘格图片

clear 
clc
row = 3200;
col = 1440;
img = zeros(row,col,3,'uint8');
a=8   %设置棋盘格的数量
for i =1:8
    if mod(i,2)==1
       for j=1:8
            if mod(j,2)==1
                img(1+(row/a)*(i-1):(row/a)*i,(col/a)*(j-1)+1:(col/a)*j,1)=uint8(255);
                img(1+(row/a)*(i-1):(row/a)*i,(col/a)*(j-1)+1:(col/a)*j,2)=uint8(255);
                img(1+(row/a)*(i-1):(row/a)*i,(col/a)*(j-1)+1:(col/a)*j,3)=uint8(255);
            end
       end
    else
        for j=1:8
            if mod(j,2)==0
                img(1+(row/a)*(i-1):(row/a)*i,(col/a)*(j-1)+1:(col/a)*j,1)=uint8(255);
                img(1+(row/a)*(i-1):(row/a)*i,(col/a)*(j-1)+1:(col/a)*j,2)=uint8(255);
                img(1+(row/a)*(i-1):(row/a)*i,(col/a)*(j-1)+1:(col/a)*j,3)=uint8(255); 
            end
        end
    end
end
filename=['C:\Users\User\Desktop\','8x8chess','.BMP'];
imwrite(img,filename)

以上是生成8x8棋盘格的图片。

5.生成每列紫绿间隔的图片

clear 
clc
row = 3200;
col = 1440;
img = zeros(row,col,3,'uint8');
img(:,:,1)=uint8(255);
img(:,:,2)=uint8(0);
img(:,:,3)=uint8(255);
for i =1:col
    if mod(i,2)==1
       img(:,i,1)=uint8(0);
       img(:,i,2)=uint8(255);
       img(:,i,3)=uint8(0);
    end
end
filename=['C:\Users\user\Desktop\','zilv','.BMP'];
imwrite(img,filename)

基本上就这几种类型，其他的都可以在以上代码的基础上调整，得到自己想要的图片。Enjoy！