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)

An example image