fix kmedoids

PRML · Jan 24, 2019 · 0635e51 · 0635e51
1 parent 87260d5
commit 0635e51
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/chapter09/kmedoids.m b/chapter09/kmedoids.m
@@ -18,7 +18,7 @@
 X = X-mean(X,2);             % reduce chance of numerical problems
 v = dot(X,X,1);
 D = v+v'-2*(X'*X);            % Euclidean distance matrix
-D(sub2ind([d,d],1:d,1:d)) = 0;              % reduce chance of numerical problems
+D(sub2ind([n,n],1:n,1:n)) = 0;              % reduce chance of numerical problems
 last = zeros(1,n);
 while any(label ~= last)
     [~,~,last(:)] = unique(label);   % remove empty clusters