Browse code

change as.matrix.noquote to noquote(as.matrix())

Greg Finak authored on 02/10/2020 15:56:31
Showing 1 changed files

... ...
@@ -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)))