From fbb4891010f8555f64c4eb7ece14f633521699a7 Mon Sep 17 00:00:00 2001
From: jleechung <joseph.lee@u.nus.edu>
Date: Tue, 30 Jul 2024 15:43:16 +0100
Subject: [PATCH] Fix centering usage

---
 DESCRIPTION     | 2 +-
 R/computation.R | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 8631709..f2230d9 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: Banksy
 Title: Spatial transcriptomic clustering
-Version: 0.99.12
+Version: 0.99.13
 Authors@R: c(
     person(given = "Vipul",
            family = "Singhal",
diff --git a/R/computation.R b/R/computation.R
index dd86df8..403b947 100644
--- a/R/computation.R
+++ b/R/computation.R
@@ -119,7 +119,7 @@ computeBanksy <- function(se,
     })
 
     # Compute harmonics with different k_geoms
-    center <- c(FALSE, rep(TRUE, length(M) - 1))
+    center <- c(FALSE, rep(center, length(M) - 1))
     har <- Map(function(knn_df, M, center) {
         out <- computeHarmonics(expr, knn_df, M, center, verbose = verbose)
         rownames(out) <- rownames(expr)