tests/testthat/test_searchForNscs.R

test_that("searchForNscs() returns all NSCs for a given pattern", {
	expect_true(length(searchForNscs("nib$")) > 5)
	expect_equal(length(searchForNscs("TEST$")), 0)
})

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.