Trực quan hóa phương sai giải thích
Bây giờ bạn sẽ tạo một biểu đồ scree thể hiện tỷ lệ phương sai được giải thích bởi từng thành phần chính, cũng như tỷ lệ tích lũy của phương sai được giải thích.
Hãy nhớ từ video rằng các biểu đồ này có thể giúp xác định số lượng thành phần chính cần giữ lại. Một cách là tìm “khuỷu tay” trên biểu đồ scree, cho thấy khi số lượng thành phần chính tăng lên, tốc độ giải thích phương sai giảm đáng kể. Nếu không thấy “khuỷu tay” rõ ràng, bạn có thể dùng biểu đồ scree làm cơ sở để đặt một ngưỡng.
Bài tập này là một phần của khóa học
Học không giám sát với R
Hướng dẫn bài tập
Tỷ lệ phương sai giải thích vẫn có trong đối tượng pve mà bạn đã tạo ở bài tập trước.
- Dùng
plot()để vẽ tỷ lệ phương sai được giải thích bởi từng thành phần chính. - Dùng
plot()vàcumsum()(tổng tích lũy) để vẽ tỷ lệ tích lũy của phương sai được giải thích theo số lượng thành phần chính.
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.
# Plot variance explained for each principal component
plot(___, xlab = "Principal Component",
ylab = "Proportion of Variance Explained",
ylim = c(0, 1), type = "b")
# Plot cumulative proportion of variance explained
plot(___, xlab = "Principal Component",
ylab = "Cumulative Proportion of Variance Explained",
ylim = c(0, 1), type = "b")