Kiểm tra số đo kích thước
Cho đến lúc này bạn đã loại bỏ 2 trường hợp có chiều cao abalone 0mm do đo sai. Bạn cũng đã loại 4 trường hợp shuckedWeight lớn hơn wholeWeight, điều này phi logic, có lẽ do lỗi ghi chép. Bộ dữ liệu abaloneKeep được nạp cho bài này giờ chỉ còn 4177 - 2 - 4 = 4171 trường hợp.
Ngoài ra, mối quan hệ giữa các số đo kích thước cũng cần được xem xét. length của abalone (tính bằng mm) được định nghĩa là số đo vỏ dài nhất. Vì vậy, length luôn phải lớn hơn height hoặc diameter. Bây giờ, bạn sẽ kiểm tra điều kiện này bằng một biểu đồ phân tán với đường tham chiếu Y=X. Sau đó, bạn sẽ loại bỏ mọi trường hợp không thỏa điều kiện length này.
Bộ dữ liệu abaloneKeep, cùng các gói dplyr và ggplot2, đã được nạp sẵn cho bạn.
Bài tập này là một phần của khóa học
R dành cho người dùng SAS
Hướng dẫn bài tập
- Vẽ biểu đồ phân tán với
lengthtrên trục x vàheighttrên trục y, rồi thêm đường tham chiếu Y=X với intercept = 0 và slope = 1. - Vẽ biểu đồ phân tán với
lengthtrên trục x vàdiametertrên trục y, rồi thêm đường tham chiếu Y=X với intercept = 0 và slope = 1. - Cập nhật
abaloneKeepđể giữ lại những mẫu cólengthlớn hơn cảheightvàdiameter.
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.
# Make scatterplot of height by length add y=x line
ggplot(___) +
___ +
___
# Make scatterplot of diameter by length add y=x line
ggplot(___) +
___ +
___
# Keep abalones with length > both height and diameter
abaloneKeep <- abaloneKeep %>%
filter((___) & (___))