如何在R中改变fviz_pca_biplot中圆的边界线的 colored颜色

我怀疑这是fviz_pca_bilot()函数的一个限制，但一个潜在的解决办法是‘手动’指定 colored颜色 ，例如

library(factoextra)
#> Loading required package: ggplot2
#> Welcome! Want to learn more? See two factoextra-related books

data(iris)
res.pca <- prcomp(iris[, -5],  scale = TRUE)

# palette works for fill but not for ellipses color
fviz_pca_biplot(res.pca,
                # Individuals
                geom.ind = "point",
                fill.ind = iris$Species,
                col.ind = "black",
                pointshape = 21, pointsize = 2,
                palette = c("#04BF8A","#D7D7D9", "red"),
                addEllipses = TRUE,
                # Variables
                col.var = "black",
                legend.title = "Type",
                repel = TRUE,
                xlim = c(-5,14),
                ylim = c(-3,8),
) +
  xlab("PC1 (74.5%)") +
  ylab("PC2 (16.6%)") +
  theme_bw()
#> Coordinate system already present. Adding new coordinate system, which will
#> replace the existing one.

# fix ellipses color
fviz_pca_biplot(res.pca,
                          # Individuals
                          geom.ind = "point",
                          fill.ind = iris$Species,
                          col.ind = "black",
                          pointshape = 21, pointsize = 2,
                          palette = c("#04BF8A","#D7D7D9", "red"),
                          addEllipses = TRUE,
                          # Variables
                          col.var = "black",
                          legend.title = "Type",
                          repel = TRUE,
                          xlim = c(-5,14),
                          ylim = c(-3,8),
) +
  xlab("PC1 (74.5%)") +
  ylab("PC2 (16.6%)") +
  theme_bw() +
  scale_color_manual(values = c("setosa" = "#04BF8A",
                                "versicolor" = "#D7D7D9",
                                "virginica" = "red"))
#> Coordinate system already present. Adding new coordinate system, which will
#> replace the existing one.

^{创建于2024-02-21，包含reprex v2.1.0}

这对你的"真实"数据有效吗？