weicai.m

MATLAB简单应用

function  weicai(file)
clear;
I=imread(file);
I=im2double(I);
 [M,N]=size(I);
 L=1.0;
 for i=1:M;
     for j=1:N;
         if I(i,j)<=L/4
             R(i,j)=0;
             G(i,j)=4*I(i,j);
             B(i,j)=L;
         else
             if I(i,j)<=L/2
                 R(i,j)=0;
                 G(i,j)=L;
                 B(i,j)=-4*I(i,j)+2*L;
             else
                 if I(i,j)<=3*L/4
                    R(i,j)=-4*I(i,j)-2*L;
                    G(i,j)=L;
                    B(i,j)=0;
                else
                    R(i,j)=L;
                    G(i,j)=-4*I(i,j)+4*L;
                    B(i,j)=0;
                end
            end
        end
    end
end
R=uint8(R*256);
G=uint8(G*256);
B=uint8(B*256);
for i=1:M
    for j=1:N
        out(i,j,1)=R(i,j);
        out(i,j,2)=G(i,j);
        out(i,j,3)=B(i,j);
    end
end
figure,imshow(out);