-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathPlotRes.m
More file actions
31 lines (30 loc) · 730 Bytes
/
PlotRes.m
File metadata and controls
31 lines (30 loc) · 730 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
function m=PlotRes(X, sol)
% Cluster Centers
m = sol.Position;
k = size(m,1);
% Cluster Indices
ind = sol.Out.ind;
Colors = hsv(k);
for j=1:k
Xj = X(ind==j,:);
subplot(2,3,1)
plot(Xj(:,1),Xj(:,2),'.','Color',Colors(j,:));title('VAO');
hold on;
subplot(2,3,2)
plot(Xj(:,1),Xj(:,3),'.','Color',Colors(j,:));title('VAO');
hold on;
subplot(2,3,3)
plot(Xj(:,1),Xj(:,4),'.','MarkerSize',12,'Color',Colors(j,:));title('VAO');
hold on;
subplot(2,3,4)
plot(Xj(:,2),Xj(:,3),'.','Color',Colors(j,:));title('VAO');
hold on;
subplot(2,3,5)
plot(Xj(:,2),Xj(:,4),'.','Color',Colors(j,:));title('VAO');
hold on;
subplot(2,3,6)
plot(Xj(:,3),Xj(:,4),'.','Color',Colors(j,:));title('VAO');
hold on;
end
hold off;
end