fix

easystats · Sep 16, 2023 · 9833672 · 9833672
1 parent ab63088
commit 9833672
Showing 1 changed file with 0 additions and 8 deletions.
diff --git a/R/principal_components.R b/R/principal_components.R
@@ -422,14 +422,6 @@ principal_components.data.frame <- function(x,
   } else if (n < 1) {
     n <- 1
   }
-
-  ## TODO: the next if-statement was removed by Dom, but this breaks
-  ## performance code. Need to check, so we for now add this back
-
-  # sanity check - we need at least two factors
-  if (n < 2 && ncol(x) >= 2) {
-    n <- 2
-  }
   n
 }