Displaying 1 result from an estimated 1 matches for "fitnw".
Did you mean:
fitn
2011 Nov 04
1
How to use 'prcomp' with CLUSPLOT?
...0,0,0,0
PRV6,59,6924,825,3008,377,926,0,0,10156,0,5555
PRV7,11,24902,36040,47223,20086,0,0,749,415,0,0
library(cluster)
fn = "big.csv";
tbl = read.table(fn, header=TRUE, sep=",", row.names=1);
mat <- as.matrix(tbl);
newtbl <- prop.table(mat,1)*100;
num.clust <- 3;
fitnw <- kmeans(newtbl, num.clust);
clusplot(newtbl, fitnw$cluster, color=TRUE, shade=TRUE, lines=0, main= paste('Principal Components plot - Kmeans ', clust.level, ' Clusters') )
Error in princomp.default(x, scores = TRUE, cor = ncol(x) != 2) :
'princomp' can only be used w...