r - 为点 PCA 分析添加边框

Question

我想为点添加边框，这将允许我使用白色。

即使传递的颜色数量等于行数，我也尝试使用fill哪个不起作用。也col.ind无济于事

library(factoextra)   
data(iris)
res.pca <- prcomp(iris[, -5],  scale = TRUE)
fviz_pca_ind(res.pca, geom.ind = c("point", "text"),
             pointsize = 3, fill.ind="black",
             habillage=iris$Species, pointshape = 19,
             palette = c("white", "orange", "grey"),
             label = "all",
             repel = TRUE ,
             invisible="quali")