طلب مهم


(system) #1

با اولا سلام عليكم اريد اطلب منكمlطلب عاجل و مهم وان شاءالله تكدرون تساعدوني في هذا يومين اني عند ي اسطر برمجية شلون اكدر اصممه في السميولينك وموضوع عن (image processing (Histogram Equalization
و اسطر برمجية
img_name هو اسم الملف وامتداده مثال a1.jpg

function y=algorithm1(img_name)

x3=imread(img_name);
x=x3(:,:,1);
[M N]=size(x);

temp_bin=zeros(1,256);
hist_bin=zeros(1,256);

z=zeros(M,N);

for m=1:M;
for n=1:N;
temp_bin(x(m,n)+1)=temp_bin(x(m,n)+1)+1;
end
end

D=1;
for i=1:256;
if (temp_bin(i)>0)
D=D+1;
end
end

j=0;
for i=1:256;
if (temp_bin(i)==0)
continue;
end

for m=1:M;
    for n=1:N;
        if (x(m,n)==i)
            z(m,n)=floor(j/D);
        end
    end
end

 j=j+temp_bin(i);

end

for m=1:M;
for n=1:N;
hist_bin(z(m,n)+1)=hist_bin(z(m,n)+1)+1;
end
end

imshow(uint8(z));
y=hist_bin