R에서의 차원 축소
Matt Pickard
Owner, Pickard Predictives, LLC






전역 구조 보존

국소 구조 보존(이웃을 가깝게 유지)

library(Rtsne)set.seed(1234) tsne <- Rtsne(attrition_df %>% select(-Attrition))tsne_df <- attrition_df %>% bind_cols(tsne_x = tsne$Y[,1], tsne_y = tsne$Y[,2])tsne_df %>% ggplot(aes(x = tsne_x, y = tsne_y, color = Attrition)) + geom_point(alpha = 0.5)

R에서의 차원 축소