tests/testthat/test-gmt.R

In llrs/BaseSet: Working with Sets the Tidy Way

context("test-gmt")

test_that("multiplication works", {
    gmtFile <- system.file(
        package = "BaseSet", "extdata",
        "hallmark.gene.symbol.gmt"
    )
    gs <- getGMT(gmtFile)
    expect_s4_class(gs, "TidySet")
})