Mercurial > repos > eschen42 > w4mcorcov

diff w4mcorcov_input.R @ 7:066b1f409e9f draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/HegemanLab/w4mcorcov_galaxy_wrapper/tree/master commit e73fabe1b3c871abbcb2e89914c181149c8e2066
author eschen42
date Thu, 26 Jul 2018 10:23:34 -0400
parents 50f60f94c034
children 9a52306991b3
line wrap: on
line diff
--- a/w4mcorcov_input.R	Wed Jul 18 12:35:55 2018 -0400
+++ b/w4mcorcov_input.R	Thu Jul 26 10:23:34 2018 -0400
@@ -165,6 +165,10 @@
       data_matrix <- as.matrix(data_matrix)
     }
 
+    # Omit any feature not found in variableMetadata and any sample not found in sampleMetadata
+    #   For something more elaborate, see https://github.com/HegemanLab/w4mclassfilter
+    data_matrix <- data_matrix[rownames(data_matrix) %in% rownames(vrbl_metadata),colnames(data_matrix) %in% rownames(smpl_metadata)]
+
     input_env$data_matrix <- data_matrix
     # ...
   } else {