Displaying 1 result from an estimated 1 matches for "kmrecluster".
2010 Jan 11
1
K-means recluster data with given cluster centers
...ste("dataset",ii,"datClusters",sep="")
print(filenameInput)
print(filenameOutput)
# LOAD DATA
data_unclean <- read.table(filenameInput)
data.matrix<-as.matrix(data_unclean,"any")
# RECLUSTER DATA
kmRecluster <- kmeans(data.matrix, centers=clusterCenters, iter.max=1)
kmRecluster$size
# WRITE OUT CLUSTERS FOR EACH DATA
write.table(kmRecluster$cluster, file = filenameOutput, sep = ",", col.names= FALSE, row.names= FALSE)
}
--
Jetzt kostenlos herunterladen: Intern...