diff --git a/R/mfairInitialization.R b/R/mfairInitialization.R index c58a0e8..5ad6958 100644 --- a/R/mfairInitialization.R +++ b/R/mfairInitialization.R @@ -11,7 +11,7 @@ #' @return Returns MFAIR object, with main data matrix and auxiliary information. #' @export createMFAIR <- function(Y, X, Y_center = TRUE, K_max = 1L, project = "MFAIR") { - if(is.data.frame(X)){ + if(!is.data.frame(X)){ stop("X should be a data.frame!") } # End