diff --git a/R/scMerge2_utilis.R b/R/scMerge2_utilis.R
index 4f7168c..c20666e 100644
--- a/R/scMerge2_utilis.R
+++ b/R/scMerge2_utilis.R
@@ -95,8 +95,9 @@ pseudoRUVIII <- function(Y, Y_pseudo, M, ctl, k = NULL, eta = NULL,
     if (normalised) {
         
         ac <- alpha[, ctl, drop = FALSE]
+        adjusted_means <- colMeans(Y)
         Y <- DelayedArray::DelayedArray(Y)
-        adjusted_means <- DelayedArray::colMeans(Y)
+