#' @importFrom ExperimentHub ExperimentHub
#' @importFrom spicyR SegmentedCells
.create_se <- function(dataset, hub=ExperimentHub(), ...) {
host <- file.path("scSpatial", dataset)
single_cell_path <- file.path(host, "spatialCellData.rds")
cellData <- read_rds(single_cell_path)
SegmentedCells(cellData, ...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.