www.gusucode.com > 关于海航matlab和lingo的训练题 > Gray_Proj.m

    %Author:  An aged donkey pulling the mill
function  Gray_Proj(I)  % I: The name of image 
A=imread(I);
m=0;
n=0;
[m,n]= size(A);
Hproj=zeros(m,1);
Vproj=zeros(1,n);
for h=1:m
    Hproj(h) = sum(A(h,:));  
 end;
hf=figure('NumberTitle','off','name','Horizontal Pjoection of A Gray Image');
plot(Hproj);

for v=1:n
    Vproj(v) = sum(A(:,v));  
 end;
vf=figure('NumberTitle','off','name','Vertical Pjoection of A Gray Image');
plot(Vproj);