context("test-sort_features")
features <- sort_features(scmisc::sce)
test_that("sort_features works", {
expect_equal(length(features), 434)
expect_equal(features[1:3], c("Tlr9", "Birc3", "Rel"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.