don't convert if < 2 genes/features

AlexsLemonade · Nov 6, 2023 · e8bab59 · e8bab59
1 parent ca04ccd
commit e8bab59
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/sce_to_anndata.R b/R/sce_to_anndata.R
@@ -33,6 +33,10 @@ sce_to_anndata <- function(sce, anndata_file, x_assay_name = "counts") {
     stop("Input SingleCellExperiment must contain at least 2 cells.")
   }
 
+  if(nrow(sce) < 2){
+    stop("Input SingleCellExperiment must contain at least 2 genes or features.")
+  }
+
   # check that filename is in the proper format for writing h5
   if (!(stringr::str_ends(anndata_file, ".hdf5|.h5"))) {
     stop("`anndata_file` must end in either '.hdf5' or '.h5'")