tests/testthat/test-MakeBackgroundInfo.R

test_that("MakeBackgroundInfo", {

  retval <- MakeBackgroundInfo(bg.spectra = MCF10A.background.spectra,
                               title = "MCF10A.background")

  testthat::expect_equal(retval, background.info[["MCF10A"]])

})
steverozen/mSigBG documentation built on Nov. 4, 2022, 10:58 a.m.