tests/testthat/test-rowcolnames.R

In vjcitn/MultiAssayExperiment: Software for the integration of multi-omics experiments in Bioconductor

context("Checking for consistency in colnames and rownames")

example("MultiAssayExperiment")

test_that("rownames and colnames return CompressedCharacterList", {
    expect_true(is(rownames(myMultiAssayExperiment),
                   "CompressedCharacterList"))
    expect_true(is(colnames(myMultiAssayExperiment),
                   "CompressedCharacterList"))
})