test_that("tnbc", {
object <- celloFull
skip_if_not(identical(
x = metadata(object)[["dataVersion"]],
y = dataVersion
))
expect_length(tnbc(object), 161L)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.