tests/testthat/test-utils.R

test_that("read_gmt() output", {
  gmt_tbl <- read_gmt(file = "http://software.broadinstitute.org/gsea/msigdb/supplemental/scsig.all.v1.0.symbols.gmt")
  expect_s3_class(gmt_tbl, "tbl_df")
  expect_gt(nrow(gmt_tbl), 1000)
})

Try the clustermole package in your browser

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

clustermole documentation built on Jan. 26, 2021, 9:05 a.m.