Mercurial > repos > eschen42 > w4mcorcov
diff w4mcorcov_wrapper.R @ 2:e03582f26617 draft
planemo upload for repository https://github.com/HegemanLab/w4mcorcov_galaxy_wrapper/tree/master commit 7682e8e7ae2bfb926d94b414b9a1649389f33582
author | eschen42 |
---|---|
date | Sun, 12 Nov 2017 19:45:36 -0500 |
parents | 0c2ad44b6c9c |
children | 50f60f94c034 |
line wrap: on
line diff
--- 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