diff w4mcorcov_wrapper.R @ 2:e03582f26617 draft

planemo upload for repository https://github.com/HegemanLab/w4mcorcov_galaxy_wrapper/tree/master commit 7682e8e7ae2bfb926d94b414b9a1649389f33582

--- a/w4mcorcov_wrapper.R	Sun Oct 22 18:47:57 2017 -0400
+++ b/w4mcorcov_wrapper.R	Sun Nov 12 19:45:36 2017 -0500
@@ -67,12 +67,13 @@
 
 # other parameters
 
-my_env$tesC            <- as.character(argVc["tesC"])
-my_env$facC            <- as.character(argVc["facC"])
-my_env$pairSigFeatOnly <- as.logical(argVc["pairSigFeatOnly"])
-my_env$levCSV          <- as.character(argVc["levCSV"])
-my_env$matchingC       <- as.character(argVc["matchingC"])
-my_env$labelFeatures   <- as.character(argVc["labelFeatures"]) # number of features to label at each extreme of the loadings or 'ALL'
+my_env$tesC               <- as.character(argVc["tesC"])
+my_env$facC               <- as.character(argVc["facC"])
+my_env$pairSigFeatOnly    <- as.logical(argVc["pairSigFeatOnly"])
+my_env$levCSV             <- as.character(argVc["levCSV"])
+my_env$matchingC          <- as.character(argVc["matchingC"])
+my_env$labelFeatures      <- as.character(argVc["labelFeatures"]) # number of features to label at each extreme of the loadings or 'ALL'
+my_env$labelOrthoFeatures <- as.logical(argVc["labelOrthoFeatures"])
 
 label_features <- my_env$labelFeatures
 labelfeatures_check <- TRUE