context("Codependencies")
test_that("All datasets", {
gene <- "SOX10"
datasets <- eval(formals(Codependencies)[["dataset"]])
for (dataset in datasets) {
object <- Codependencies(gene = gene, dataset = dataset)
expect_s4_class(object, "Codependencies")
}
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.