library(factoextra)
library(FactoMineR)
res.pca = PCA(clin.oc[,1:14], graph = TRUE)
scree = fviz_screeplot(res.pca, ncp=5, addlabels=TRUE, size=0.5, title='Scree
plot')
loadings = plot(res.pca, choix = "var", title='Loadings')
n = fviz_contrib(res.pca, choice = "var", axes = 1, top = 5, title='Variable
contributions')
scores = fviz_pca_ind(res.pca, label="none", habillage=as.factor(clin),
tittle='scores')
ggarrange(scree, loadings, n, scores)
并且ggarange函数不起作用，表示未找到。
1条答案
按热度按时间zxlwwiss1#
我认为这个错误已经在res.pca中了，因为你的'identifier'变量是字符类型的。五氯苯甲醚（临床文献[，2：14]，...）。