lower case the merged too

AlexsLemonade · Jul 29, 2024 · 6a4a59f · 6a4a59f
1 parent 734ee95
commit 6a4a59f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bin/sce_to_anndata.R b/bin/sce_to_anndata.R
@@ -78,7 +78,7 @@ if (!is.null(opt$output_pca_tsv) && !stringr::str_ends(opt$output_pca_tsv, ".tsv
 # this function updates merged object formatting for anndata export
 format_merged_sce <- function(sce) {
   # paste X to any present reduced dim names
-  reducedDimNames(sce) <- glue::glue("X_{reducedDimNames(sce)}")
+  reducedDimNames(sce) <- glue::glue("X_{tolower(reducedDimNames(sce))}")
   return(sce)
 }