tests/testthat/test_MEME.R
In ge11232002/TFBSTools: Software Package for Transcription Factor Binding Site (TFBS) Analysis
test_that("parseMEMEOutput", {
memeOutput <- file.path(system.file("extdata", package="TFBSTools"),
"meme.output")
ans <- parseMEMEOutput(memeOutput)
expect_equal(length(ans$motifList), 5L)
expect_equivalent(lengths(ans$motifList), c(17L, 5L, 2L, 5L, 2L))
expect_equal(ans$motifEvalues, c(4.1e-09, 2.8e+02, 1.2e+03, 1.4e+03, 1.8e+03))
})
ge11232002/TFBSTools documentation built on Sept. 12, 2021, 12:07 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("parseMEMEOutput", {
memeOutput <- file.path(system.file("extdata", package="TFBSTools"),
"meme.output")
ans <- parseMEMEOutput(memeOutput)
expect_equal(length(ans$motifList), 5L)
expect_equivalent(lengths(ans$motifList), c(17L, 5L, 2L, 5L, 2L))
expect_equal(ans$motifEvalues, c(4.1e-09, 2.8e+02, 1.2e+03, 1.4e+03, 1.8e+03))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.