Make 'spe_to_seurat()' example faster by running on smaller subsets o…

…f data
LieberInstitute · Aug 23, 2024 · 46bc9d5 · 46bc9d5
1 parent 79b3a14
commit 46bc9d5
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/R/spe_to_seurat.R b/R/spe_to_seurat.R
@@ -31,7 +31,7 @@
 #' ## Download some example data
 #' spe_unstitched <- spatialLIBD::fetch_data(
 #'     type = "spatialDLPFC_Visium_example_subset"
-#' )
+#' )[seq(100), seq(100)]
 #'
 #' ## Make the column names unique
 #' colnames(spe_unstitched) <- spatialLIBD::add_key(spe_unstitched)$key
@@ -44,7 +44,7 @@
 #' if (!exists("spe")) {
 #'     spe <- spatialLIBD::fetch_data(type = "visiumStitched_brain_spe")
 #' }
-#' seur_stitched <- spe_to_seurat(spe)
+#' seur_stitched <- spe_to_seurat(spe[seq(100), seq(100)])
 #'
 #' ## Let's look at our resulting Seurat object
 #' seur_stitched

diff --git a/man/spe_to_seurat.Rd b/man/spe_to_seurat.Rd