function X = test_anwendung(A, K, M)
%Input:	- Datenpunkte A aus eingelesener Bilddatei 
%	- Anzahl der zu formenden Cluster K,
% 	- Anzahl der Durchlaeufe M des Algorithmus
%Output: - Matrix X, in der jeder Datenpunkt durch den 
% 	 naechstgelegenen Clusterpunkt ersetzt wurde

n1=size(A,1); n2=size(A,2); % Def. Groesse des Bildes
m=n1*n2;                    % Def. Anzahl an Pixel
A=single(A);                % Anpassung Datentyp von A
A=reshape(A,[m,3,1]);       % Organisation in Zeilen einer Matrix 
c=randperm(m,K);            % K zufaellige Zahlen zwischen 1 und m
S=A(c,:);                   % Def. S als K zufaellige Zeilen von A

X=test_kmeans(A,S,M);            % Anwendung der kmeans-funktion
X=uint8(X);                 % Anpassung Datentyp von X
X=reshape(X,[n1,n2,3]);     % Reorganisation in Form des Bildes

imshow(X);                  % Anzeige des Ergebnisses

end

