comparison runit/checkformat_tests.R @ 1:e194eec8e70c draft

planemo upload for repository https://github.com/workflow4metabolomics/checkformat.git commit 8ebfbfa8d9449c9bbfbf569851a30b1e33df0b3f

1:e194eec8e70c

test_input_default <- function() {

    testDirC <- "input"
    argLs <- list()

    argLs <- c(defaultArgF(testDirC), argLs)
    outLs <- wrapperCallF(argLs)

    checkEquals(outLs[['infVc']][4], 'Table formats are OK; enjoy your analyses!')

}