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) }