minor x-axis

easystats · Dec 1, 2023 · 4c12bbf · 4c12bbf
1 parent 905cde5
commit 4c12bbf
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/plot.n_factors.R b/R/plot.n_factors.R
@@ -58,12 +58,12 @@ data_plot.n_factors <- function(x, data = NULL, type = "bar", ...) {
   # Inverse xlab and ylab for line plot
   if (type == "line") {
     attr(dataplot, "info") <- list(
-      ylab = paste("Number of", lab),
+      ylab = paste("Optimal number of", lab),
       xlab = axis_lab
     )
   } else {
     attr(dataplot, "info") <- list(
-      xlab = paste("Number of", lab),
+      xlab = paste("Optimal number of", lab),
       ylab = axis_lab
     )
   }