ZAPISZ

function [] = zapisz( im )
a=imread(im);
bw=im2bw(a);

[lab,n]=bwlabel(bw);

for i=1:n
    imi=lab==i;
    nazwa=strcat('plamy',int2str(i),'.jpg');
    imwrite(imi,nazwa);
end

end



WCZYTAJ


function [matOfVectors] = wczytaj(pn)
n=size(pn,2);
matOfVectors=zeros(n,3);
for i=1:n
    a=imread(pn{i});
    bw=im2bw(a);
    %figure, imshow(bw)
    r=regionprops(bw,'all');
    feature_vector(1)=r.Eccentricity;
    feature_vector(2)=r.Solidity;
    feature_vector(3)=r.EquivDiameter;
    matOfVectors(i,1:3)=feature_vector;
end
end