2013-04-15 39 views

回答

3

這應該有效嗎?讓我知道如果它不。首先,讓所有的相關行名稱:

clust3 <- row.names(km$cluster[km$cluster == 3]) 

現在使用subset去你需要其中:

subset(mat2, row.names(mat2) %in% clust3) 
1
mat2[which(km$cluster == 3), , drop=FALSE] 

應該工作,假設行i公里的對應於第i行的mat2

+2

當'length(which(km $ cluster == 3))== 1L'時,使用'drop = FALSE'來停止對向量的自動強制轉換 – mnel