fix warning

easystats · Oct 13, 2023 · cc30cd0 · cc30cd0
1 parent 14eb426
commit cc30cd0
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/plot.parameters_pca.R b/R/plot.parameters_pca.R
@@ -33,6 +33,8 @@ data_plot.parameters_pca <- function(x, data = NULL, ...) {
     title <- paste0("Rotated loadings from ", title, " (", rotation_name, ")")
   }
 
+  # remove missing values in y, to avoid warning
+  dataplot <- dataplot[!is.na(dataplot$y), ]
 
   attr(dataplot, "info") <- list(
     "xlab" = "",