fix bug

stemangiola · stemangiola · commit 33fcd76143d6 · 2023-09-07T16:51:19.000+10:00
diff --git a/R/utilities.R b/R/utilities.R
@@ -698,7 +698,7 @@ check_se_dimnames <- function(se) {
         )
 
     }
-  }
+  
   if (is.null(rownames(se)) && 
       length(assays(se)) > 0) {
     rn <- vapply(assays(se, withDimnames = FALSE), function(x) !is.null(rownames(x)), FALSE)

Original file line number	Diff line number	Diff line change
`@@ -698,7 +698,7 @@ check_se_dimnames <- function(se) {`
`698`	`698`	`)`
`699`	`699`
`700`	`700`	`}`
`701`		`- }`
	`701`	`+`
`702`	`702`	`if (is.null(rownames(se)) &&`
`703`	`703`	`length(assays(se)) > 0) {`
`704`	`704`	`rn <- vapply(assays(se, withDimnames = FALSE), function(x) !is.null(rownames(x)), FALSE)`