getBaseSeuratData <- function(){
suppressWarnings(SeuratData::InstallData("pbmc3k"))
suppressWarnings(data("pbmc3k"))
seuratObj <- suppressWarnings(Seurat::UpdateSeuratObject(pbmc3k))
return(seuratObj)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.