Mercurial > repos > ethevenot > profia

comparison runit/profia_tests.R @ 2:3f8ae071bdda 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/profia.git commit 19ed25c048232776369a392ddb8c1860471acd29
author ethevenot
date Mon, 22 Jan 2018 11:32:41 -0500
parents 39ccace77270
children
comparison
equal deleted inserted replaced
1:4753e64cf694 2:3f8ae071bdda
2 2
3 testDirC <- "plasfia" 3 testDirC <- "plasfia"
4 argLs <- list(zipfile = "./plasfia/plasFIA.zip", 4 argLs <- list(zipfile = "./plasfia/plasFIA.zip",
5 library = "NULL", 5 library = "NULL",
6 ppmN = "2", 6 ppmN = "2",
7 dmzN = "0.0005",
7 ppmGroupN = "1", 8 ppmGroupN = "1",
9 dmzGroupN = "0.0005",
8 fracGroupN = "0.1", 10 fracGroupN = "0.1",
9 kI = "2") 11 imputeC = "randomForest")
10 12
11 argLs <- c(defaultArgF(testDirC), argLs) 13 argLs <- c(defaultArgF(testDirC), argLs)
12 outLs <- wrapperCallF(argLs) 14 outLs <- wrapperCallF(argLs)
13 15
14 checkEqualsNumeric(outLs[["datMN"]]["C100a", "M86.0965"], 1313797.6184402, tolerance = 1e-7) 16 checkEqualsNumeric(outLs[["datMN"]]["C100a", "M86.0965"], 1365657.4687182, tolerance = 1e-7)
15 17
16 } 18 }