test_that("RangedSummarizedExperiment", {
rowRanges(rse) <- as(rowRanges(rse), "EnsemblGenes")
object <- rse
object <- EnsemblToNcbi(object)
expect_s4_class(object, "EnsemblToNcbi")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.