# HG changeset patch # User sblanck # Date 1519484871 18000 # Node ID cb29ad7d75a553be07938fdaa2eb0a170fe7e671 # Parent b027311db6e4fe117d65910a14b8a5e06cb63553 planemo upload for repository https://github.com/sblanck/smagexp/tree/master/smagexp_tools commit a0cb2703e4dbbc1fadeedc5b61acb6e1324433f7 diff -r b027311db6e4 -r cb29ad7d75a5 MetaRNASeq.R --- a/MetaRNASeq.R Sat Feb 24 08:31:54 2018 -0500 +++ b/MetaRNASeq.R Sat Feb 24 10:07:51 2018 -0500 @@ -43,16 +43,6 @@ listfilenames=c(listfilenames,inputFileInfo[2]) } -cargs <- commandArgs() -cargs <- cargs[(which(cargs == "--args")+1):length(cargs)] -nbargs=length(cargs) -listfiles=vector() -listfilenames=vector() -for (i in seq(1,nbargs-6,2)) { - listfiles=c(listfiles,cargs[[i]]) - listfilenames=c(listfilenames,cargs[[i+1]]) -} -#mod<-cargs[[length(cargs) - 6]] outputfile <- opt$result result.html = opt$htmloutput html.files.path=opt$htmloutputpath