Mercurial > repos > ethevenot > checkformat

comparison runit/checkformat_runtests.R @ 3:80a38d36f946 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/workflow4metabolomics/checkformat.git commit 5cf3f6eb62c1396ade1b068a3dd3cc2e3f827e15
author ethevenot
date Thu, 11 Jan 2018 10:24:56 -0500
parents e194eec8e70c
children
comparison
equal deleted inserted replaced
2:b6a6b4cc932a 3:80a38d36f946
80 if(file.exists(file.path(dirname(scriptPathC), testInDirC, "sampleMetadata.tsv"))) 80 if(file.exists(file.path(dirname(scriptPathC), testInDirC, "sampleMetadata.tsv")))
81 defaultArgLs[["sampleMetadata_in"]] <- file.path(dirname(scriptPathC), testInDirC, "sampleMetadata.tsv") 81 defaultArgLs[["sampleMetadata_in"]] <- file.path(dirname(scriptPathC), testInDirC, "sampleMetadata.tsv")
82 if(file.exists(file.path(dirname(scriptPathC), testInDirC, "variableMetadata.tsv"))) 82 if(file.exists(file.path(dirname(scriptPathC), testInDirC, "variableMetadata.tsv")))
83 defaultArgLs[["variableMetadata_in"]] <- file.path(dirname(scriptPathC), testInDirC, "variableMetadata.tsv") 83 defaultArgLs[["variableMetadata_in"]] <- file.path(dirname(scriptPathC), testInDirC, "variableMetadata.tsv")
84 84
85 defaultArgLs[["dataMatrix_out"]] <- file.path(dirname(scriptPathC), testOutDirC, "dataMatrix.tsv")
86 defaultArgLs[["sampleMetadata_out"]] <- file.path(dirname(scriptPathC), testOutDirC, "sampleMetadata.tsv")
87 defaultArgLs[["variableMetadata_out"]] <- file.path(dirname(scriptPathC), testOutDirC, "variableMetadata.tsv")
85 defaultArgLs[["information"]] <- file.path(dirname(scriptPathC), testOutDirC, "information.txt") 88 defaultArgLs[["information"]] <- file.path(dirname(scriptPathC), testOutDirC, "information.txt")
86 89
87 defaultArgLs 90 defaultArgLs
88 91
89 } 92 }