r - Factoextra 包中 PCA 贡献中的参考线值

Question

Factoextra 是一个很好的可视化 PCA 结果的软件包。而我想知道的是 PCA 贡献图中参考线的值。在这种情况下，它约为 10%。有没有一般原则这个值是多少？

library(factoextra)
library(FactoMineR)
df <- decathlon2[1:23, 1:10]
res.pca <- PCA(df,  graph = FALSE)
fviz_contrib(res.pca, choice = "var", axes = 1, top = 10)

一个例子 ：