如何在来自 ggfortify::autoplot() 的 PCA 图中使填充变暗？

如何解决如何在来自 ggfortify::autoplot() 的 PCA 图中使填充变暗？

我正在 ggplot 中制作 PCA，使用 ggfortify 并且需要填充为更暗，因为它似乎默认为半透明。示例代码：

library(ggfortify)
df <- iris[1:4]

pca_res <- prcomp(df,scale. = TRUE)

autoplot(pca_res,data = iris,colour = 'Species',loadings = F,label = F,loadings.label = F,frame = T,main = "Iris",loadings.colour = "black",scale = 1,loadings.label.colour = "black") +
         theme_classic() +
         scale_color_manual(values = c("black","black","black")) +
         scale_fill_manual(values = c("blue","red","green"))

这个图看起来像：

我希望边界区域的填充颜色深得多，就像“蓝色”或“红色”如果不是半透明的一样。