Mercurial > repos > fabio > iwtomics
diff loadandplot.R @ 32:9ae17a3d1a91 draft
Uploaded 20170531
author | fabio |
---|---|
date | Wed, 31 May 2017 12:39:37 -0400 |
parents | 3c610e8659bd |
children | fcc0eb90fb07 |
line wrap: on
line diff
--- a/loadandplot.R Wed May 31 12:33:02 2017 -0400 +++ b/loadandplot.R Wed May 31 12:39:37 2017 -0400 @@ -1,10 +1,6 @@ -if (require("IWTomics",character.only = TRUE,quietly = FALSE)) { - require(tools,quietly = FALSE) +library("IWTomics", quietly=TRUE, warn.conflicts=FALSE,verbose = FALSE) +#if (require("IWTomics",character.only = TRUE,quietly = FALSE)) { args=commandArgs(TRUE) - - for (i in seq_along(args)) { - message(args[[i]]) - } # get args names and values args_values=strsplit(args,'=') @@ -140,7 +136,7 @@ #file=outfeatures,quote=FALSE,sep='\t',row.names=FALSE,col.names=FALSE) write.table(as.data.frame(t(idFeatures(regionsFeatures))),file=outfeatures,quote=FALSE,sep='\t',row.names=FALSE,col.names=FALSE) save(regionsFeatures,file=outrdata) -}else{ - quit(save="no", status=255) - stop("Missing IWTomics package") -} \ No newline at end of file +#}else{ + #quit(save="no", status=255) + #stop("Missing IWTomics package") +#} \ No newline at end of file