SAVE基R

-3

のうちのクラスターIは、データをクラスタリングするために従うコードを書いた：（8、6、7、20、18）SAVE基R

clusrer.data <- function(data,n) { 
    miRNA.exp.cluster <- scale(t(miRNA.exp)) 
    k.means.fit <- kmeans(miRNA.exp.cluster,n) 
    #i try to save the results of k-means cluster by this code : 
    k.means.fit <- as.data.frame(k.means.fit) 
    write.csv(k.means.fit, file="k-meanReslut.csv") 
    #x<-k.means.fit$clusters 
    #write.csv(x, file="k-meanReslut.csv") 
}

私は（クラスタ）の外部にクラスタを保存することはできません、私はtxtファイルまたはCSVに（列と行で）区切られた各クラスタを保存したいと思います。

出典

2016-03-27 hisham

お願いします。私たちはあなたのデータにアクセスすることはできません。私たちが何をしているか、期待される結果がどのように見えるかを私たちに描きます。 –

これでは不十分です。例を提供する方法については、[この記事]（http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example）を参照してください。 –

私はk-meansによってクラスタリングを行いました。結果は5クラスタです。クラスタリング後私はtxtまたはCSVファイルで各クラスタを保存したい。すべてのクラスタには、列の名前と行の名前とデータが含まれている必要があります。 – hisham

クラスタに従って元のデータセットを分割し、そのチャンクをファイルに保存する方法の1つです。簡単な視覚的チェックのために元のデータセットにクラスタ割り当てを追加しました。例は部分的に?kmeansから取られます。ファイルの書き方やファイル名の作成方法は自由に変更できます。

x <- rbind(matrix(rnorm(100, sd = 0.3), ncol = 2), 
      matrix(rnorm(100, mean = 1, sd = 0.3), ncol = 2)) 
colnames(x) <- c("x", "y") 
(cl <- kmeans(x, 2)) 

x <- cbind(x, cluster = cl$cluster) 

by(x, INDICES = cl$cluster, FUN = function(sp) { 
    write.table(sp, file = paste0("file", unique(sp$cluster), ".txt"), 
       row.names = TRUE, col.names = TRUE) 
})

出典

2016-03-27 14:08:54

答えて

関連する問題