Mercurial > repos > ethevenot > transformation

view runit/transformation_tests.R @ 2:0ccfc3e15710 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/transformation.git commit b0373e2f4702a572450205419e2d64579c24c9ae
author ethevenot
date Tue, 06 Jun 2017 11:55:21 -0400
parents d9e05021553c
children
line wrap: on
line source

test_input_log10 <- function() {

    testDirC <- "input"
    argLs <- list(method = "log10")

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

    checkEqualsNumeric(outLs[['datMN']]['HU_021', 'HMDB03072'], 4.817089, tolerance = 1e-6)
 
}

test_input_sqrt <- function() {

    testDirC <- "input"
    argLs <- list(method = "sqrt")

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

    checkEqualsNumeric(outLs[['datMN']]['HU_021', 'HMDB03072'], 256.177640, tolerance = 1e-6)
 
}