...
|
...
|
@@ -144,7 +144,7 @@ mergeMatricesForPlotCOMPASSResultStack <- function(x,
|
144
|
144
|
|
145
|
145
|
# Now bind together the mean gamma matrices
|
146
|
146
|
# use column names to make sure numbers are under the correct categories
|
147
|
|
- MMerged <- as.matrix.noquote(rbindlist(MList, use.names=TRUE))
|
|
147
|
+ MMerged <- noquote(as.matrix(rbindlist(MList, use.names=TRUE)))
|
148
|
148
|
# And the rowann matrices
|
149
|
149
|
rowannMerged <- as.data.frame(rbindlist(rowannList))
|
150
|
150
|
rownames(rowannMerged) <- unname(unlist(lapply(rowannList, rownames)))
|