Mercurial > repos > anmoljh > csv_to_rdata
changeset 2:85944f34e129 draft
planemo upload commit ed84801645679d29264a5946c6e7669d26c07f39-dirty
author | anmoljh |
---|---|
date | Wed, 18 Oct 2017 08:17:03 -0400 |
parents | 4e55a218baa5 |
children | d98e0124cb31 |
files | csv2rdata.R csv2rdata.xml |
diffstat | 2 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/csv2rdata.R Wed Oct 18 04:51:39 2017 -0400 +++ b/csv2rdata.R Wed Oct 18 08:17:03 2017 -0400 @@ -13,7 +13,7 @@ dataX <- file[,1:(col-1)] dataY <- file[,col] stopifnot(nrow(dataX) == length(dataY)) - save(dataX,dataY,file=arg2) + saveRDS(dataX,dataY,file=arg2) } else{ cat("the Outcome column has less number of entry than number of compounds.please check input file.\n",file=stderr())
--- a/csv2rdata.xml Wed Oct 18 04:51:39 2017 -0400 +++ b/csv2rdata.xml Wed Oct 18 08:17:03 2017 -0400 @@ -18,13 +18,13 @@ </inputs> <outputs> - <data name="RData" format="data" label="Input.RData" /> + <data name="RData" format="rdata" label="Input.rds" /> </outputs> <tests> <test> <param name="file1" value="non_redundant.csv" /> - <output name="RData" file="desc.RData" compare="sim_size" delta="50000" /> + <output name="RData" file="desc.rds" compare="sim_size" delta="50000" /> </test> </tests>