R 中的降维
Matt Pickard
Owner, Pickard Predictives, LLC

不要整株用,只取最好部分







library(ggfortify)pca_res <- prcomp(attrition_df %>% select(-Attrition), scale. = TRUE)autoplot(pca_res,data = attrition_df,colour = "Attrition",alpha = 0.7,loadings = TRUE,loadings.label = TRUE,loadings.colour = "black",loadings.label.colour = "black",loadings.label.repel = TRUE)
R 中的降维