tests/testthat/test-get_human_tfs.R

test_that("get_human_tfs return list of TFs", {
    skip_if_offline()
    skip_on_bioc()
    human.tfs <- get_human_tfs()
    expect_true("FOXA1" %in% human.tfs$external_gene_name)
    expect_true(!"COL6A1" %in% human.tfs$external_gene_name)
})

Try the MethReg package in your browser

Any scripts or data that you put into this service are public.

MethReg documentation built on Nov. 8, 2020, 8:01 p.m.