From f86c6be3de2e10eaae4f0cfa470d1f4374049ed2 Mon Sep 17 00:00:00 2001
From: WANG Zhiwei <48282751+statwangz@users.noreply.github.com>
Date: Fri, 22 Sep 2023 15:54:27 +0800
Subject: [PATCH] Update mfairBackfitting.R

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

diff --git a/R/mfairBackfitting.R b/R/mfairBackfitting.R
index 8e6d99d..e7be5a1 100644
--- a/R/mfairBackfitting.R
+++ b/R/mfairBackfitting.R
@@ -75,7 +75,7 @@ fitBack <- function(object,
   # Will be used for the partially observed matrix fitting
   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)
     }