X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=EBSeq%2Frsem-for-ebseq-generate-ngvector-from-clustering-info;h=ccc52f70ad321cca9d71de19eb640978331f550a;hb=83ce658a4b9c5f04c081316314b66b94ad5ffbde;hp=312dbfa33c77339b530e67362e14e391e75f4259;hpb=9c2e46183a19d661f0a618a8eabe8ce1f6a8e2d6;p=rsem.git diff --git a/EBSeq/rsem-for-ebseq-generate-ngvector-from-clustering-info b/EBSeq/rsem-for-ebseq-generate-ngvector-from-clustering-info index 312dbfa..ccc52f7 100755 --- a/EBSeq/rsem-for-ebseq-generate-ngvector-from-clustering-info +++ b/EBSeq/rsem-for-ebseq-generate-ngvector-from-clustering-info @@ -6,7 +6,7 @@ if (length(argv) != 2) { q(status = 1) } -data <- read.table(file = argv[1], stringsAsFactors = F) +data <- read.table(file = argv[1], stringsAsFactors = F, sep = "\t") idx <- data[,2] >= 0 kmr <- kmeans(data[idx, 2], 3) order <- order(kmr$centers)