Thêm rug plot
Biểu đồ vừa tạo trông khá ổn, nhưng bạn có thể thấy dấu hiệu hơi hai đỉnh (bi-modality) giữa các giờ từ 10 đến 15. Vì chúng ta chỉ đang nhìn phần khối của ước lượng mật độ nên khá khó để biết mình tự tin đến mức nào về hình dạng đó.
Hãy xử lý điều này bằng vài bước sau.
Đầu tiên, giảm alpha của biểu đồ mật độ để bạn có thể xác định chính xác hơn các đỉnh dựa vào lưới nền.
Tiếp theo, thêm một rug plot bên dưới đồ thị mật độ bằng geom_rug(). Để thể hiện sự chồng lấp có thể xảy ra trong rug plot, đặt alpha của nó bằng 0.5.
Data frame bạn đã tạo ở bài trước: truck_speeding đã được tải sẵn cho bạn.
Bài tập này là một phần của khóa học
Thực hành tốt nhất về trực quan hóa trong R
Hướng dẫn bài tập
- Đặt alpha của biểu đồ mật độ là
0.7. - Thêm
geom_rug()vào biểu đồ. - Đặt alpha của rug plot là
0.5.
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.
ggplot(truck_speeding, aes(x = hour_of_day)) +
# Adjust opacity to see gridlines with alpha = 0.7
geom_density(bw = 1.5, fill = 'steelblue', ___) +
# add a rug plot using geom_rug to see individual data points, set alpha to 0.5.
___ +
labs(title = 'Citations by hour', subtitle = "Gaussian kernel SD = 1.5")