% Clustering Problem using a Self-Organizing Map





load data

dim1 = 6;
dim2 = 10;
net = selforgmap ([dim1 dim2]);

net = train(net,data);

figure, plotsomplanes(net) 


net1=selforgmap([6 10]);
Y=pdist(data)
net=train(net1,Y);
figure, plotsomplanes(net)