Mercurial > repos > md-anderson-bioinformatics > heat_map_creation_advanced
diff CHM_Advanced.R @ 6:1f13d304ddbd draft
Uploaded
author | insilico-bob |
---|---|
date | Thu, 20 Jun 2019 11:36:53 -0400 |
parents | 8893ea2915cc |
children |
line wrap: on
line diff
--- a/CHM_Advanced.R Thu Nov 08 14:59:57 2018 -0500 +++ b/CHM_Advanced.R Thu Jun 20 11:36:53 2019 -0400 @@ -17,7 +17,7 @@ performDataOrdering<-function(dataFile, rowOrderMethod, rowDistanceMeasure, rowAgglomerationMethod, colOrderMethod, colDistanceMeasure, colAgglomerationMethod,rowOrderFile, colOrderFile, rowDendroFile, colDendroFile, rowCut, colCut) { - dataMatrix = read.table(dataFile, header=TRUE, sep = "\t", row.names = 1, as.is=TRUE, na.strings=c("NA","N/A","-","?")) + dataMatrix = read.table(dataFile, header=TRUE, sep = "\t", check.names = FALSE, row.names = 1, as.is=TRUE, na.strings=c("NA","N/A","-","?")) rowOrder <- createOrdering(dataMatrix, rowOrderMethod, "row", rowDistanceMeasure, rowAgglomerationMethod) if (rowOrderMethod == "Hierarchical") { writeHCDataTSVs(rowOrder, rowDendroFile, rowOrderFile)