Trực quan hóa phương sai giải thích
Sau khi đã tính toán xong, việc biểu diễn dữ liệu trực quan luôn rất hữu ích. Bây giờ bạn sẽ tạo một biểu đồ cột thể hiện phương sai được giải thích theo từng thành phần chính.
Vector variable_explained bạn đã tạo ở bài trước có sẵn, và ggplot() theme_() đang được đặt là classic.
Bài tập này là một phần của khóa học
Kỹ thuật đặc trưng (Feature Engineering) với R
Hướng dẫn bài tập
- Sử dụng thông tin trong PCA tibble để tạo biểu đồ cột thể hiện phương sai được giải thích.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
PCA = tibble(PC = 1:length(sdev), var_explained = var_explained,
cumulative = cumsum(var_explained))
# Use the information in the PCA tibble to create a column plot of variance explained
PCA %>% ggplot(aes(x = ___, y = ___)) +
geom_col(fill = "steelblue") +
xlab("Principal components") +
ylab("Variance explained")