From e110f311f4bfaf2a7d724b91aabc99e5c8ea0acf Mon Sep 17 00:00:00 2001
From: WANG Zhiwei <48282751+statwangz@users.noreply.github.com>
Date: Thu, 21 Sep 2023 19:16:06 +0800
Subject: [PATCH] Update mfairGreedy.R

---
 R/mfairGreedy.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/mfairGreedy.R b/R/mfairGreedy.R
index ba124cb..579ff13 100644
--- a/R/mfairGreedy.R
+++ b/R/mfairGreedy.R
@@ -25,7 +25,7 @@ fitGreedy <- function(object, K_max = NULL,
   # Check whether partially observed main data matrix and record the indices
   if (object@Y_missing) {
     if (object@Y_sparse) {
-      obs_indices <- as.matrix(summary(Y)[, c(1, 2)])
+      obs_indices <- as.matrix(summary(object@Y)[, c(1, 2)])
     } else {
       obs_indices <- !is.na(object@Y)
     }