xy = rand(5, 2);
centrd = mean(xy);
[dist1,idx1] = pdist2(xy, centrd, 'euclidean', 'Smallest', size(xy,1));
centre_point = xy(idx1(1),:);
[distances,idx2] = pdist2(xy, centre_point, 'euclidean', 'Smallest', size(xy,1));
Distance_Sum = sum(distances);
figure(1)
plot(xy(:,1), xy(:,2), 'pg', 'MarkerSize',10, 'MarkerFaceColor','g')
hold on
plot([repmat(centre_point(1),size(xy,1),1) xy(:,1)]', [repmat(centre_point(2),size(xy,1),1) xy(:,2)]')
hold off
grid
text(centrd(1), centrd(2), sprintf('\\Sigma \\itdist\\rm = %.4f',Distance_Sum), 'FontSize',10)
Best Answer