algorithmeclara.asv

来自「matlab programming for clustering pam , 」· ASV 代码 · 共 30 行

function [clusters,idmedoids] =AlgorithmeCLARA(image,NombreClusters)

tic %Debut du timer

[lignes,colonnes]=size(image);
pixels=[];

for i=1:lignes
    for j=1:colonnes
        pixels=[pixels;image(i,j)];
    end;
end;
res=clara(pixels,NombreClusters,[4]);

VecteurObjets=res.ncluv;

k=1;
for i=1 :lignes
for j=1 : colonnes
imageResultat(i,j)=VecteurObjets(1,k);
k=k+1;
end;
end;

clusters=VecteurObjets;
idmedoids=res.idmed;

DureeTraitements=toc % Donner la dur閑 du traitement

imagesc (image); figure(gcf)