tests/testthat/test_removeMolDataType.R

test_that("removeMolDataType output is correct", {
	
	expect_identical(unname(removeMolDataType(c("expTP53", "copMDM2", "mutCHEK2", "mutBRAF"))),
									 c("TP53", "MDM2", "CHEK2", "BRAF"))
	
	expect_identical(unname(removeMolDataType("expSLFN11")), "SLFN11")
	
})

Try the rcellminer package in your browser

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

rcellminer documentation built on Nov. 26, 2020, 2:02 a.m.