PCA Graph（和ggcorrplot）中的字体样式

Question

我正在尝试准备要发表的文章，但在我的PCA图表中无法获得一致的字体样式时遇到困难。我正在使用fviz_pca_var函数。我正在使用的代码是

[〝〞。，＂]

结果图表如下所示。问题是图表内的文字是Arial而不是Times

我也尝试过

library(ggplot2)
library(FactoMineR)
library(factoextra)

irispca <- PCA(iris,quali.sup = 5)
fviz_pca_var(irispca, col.var = "black", ggtheme = theme_classic2(base_family = "Times"))

fviz_pca_var（irispca，col.var =“ black”，ggtheme = add_el）

还有这个

add_el <- theme_grey() +
+   theme(text = element_text(family = "Times"))

即使是Scree图也有同样的问题

fviz_pca_var(irispca, col.var = "black") + theme(text = element_text(size = 14,  family = "Times"))

任何技巧都很棒。