2017-05-07 2 views
0

Nehmen wir an, ich mehrere Operationen und erstellt Clustervektoren der Korrelationswerte unterUm Kreuzung von Clustern in R finden

D <- matrix(rexp(10*10,rate=.1), ncol=10) #create a randomly filled 10x10 matrix 
C <- matrix(rexp(10*10,rate=.1),ncol=10) 

DCor <- cor(D) # generate correlation matrix 
CCor <- cor(C) 

DUpper<- DCor[upper.tri(DCor)] # extract upper triangle 
CUpper<- CCor[upper.tri(CCor)] 

ClusterD <- kmeans(DUpper,3) # cluster correlations 
ClusterC <- kmeans(CUpper,3) 

ClusterC <- cbind(c(1:45),matrix(ClusterC$cluster)) # add row numbers as column 
ClusterD <- cbind(c(1:45),matrix(ClusterD$cluster)) 

getan haben gezeigt, ich möchte eine Matrix erzeugen, zeigt die Schnittstelle jeder Cluster-Gruppe. In dieser Matrix gehören 5 Zeilen sowohl zur C1- als auch zur D2-Gruppe.

enter image description here

Wie kann ich eine Matrix wie diese erzeugen?

+2

Sie sollten einen Samen zum Beispiel hinzufügen, um es besser reproduzierbar zu machen, da die Clustering-Ergebnisse zufällig sind. – Sraffa

Antwort

1

Bevor die cbind Linien könnten Sie tun:

table(ClusterC$cluster, ClusterD$cluster) 
Verwandte Themen