Phân loại tuổi theo phân loại trọng lượng vỏ
Trước đó, ở chương 2, bạn đã tạo agecat cho bào ngư có tuổi nhỏ hơn 10.5 năm (mã hóa là "< 10.5") so với những con từ 10.5 năm trở lên (mã hóa là "10.5 and older"). Giờ hãy phân nhóm trọng lượng vỏ của bào ngư thành các mức bằng hoặc thấp hơn 0.235 gram so với những con nặng hơn 0.235 gram.
Bộ dữ liệu abaloneKeep kèm agecat đã được nạp sẵn cho bạn cùng với gói dplyr.
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
- Dùng hàm
ifelse()để thêmshellcatvàoabaloneKeep, chia trọng lượng vỏ thành 2 nhóm trên và dưới 0.235g, gán nhãn"<= 0.235g"và"> 0.235g". - Tạo bảng chéo có tên
tableageshellchoagecattheoshellcat, dùng chochisq.test(). Chạychisq.test()trêntableageshell. - Vẽ mosaic plot của
agecattheoshellcat. Dùng màu"light blue"và"grey". Đặt tiêu đề là"Mosaicplot of age by shell categories".
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.
# Add shellcat to abaloneKeep
___ <- ___ %>%
mutate(shellcat = ifelse(___, ___, ___))
# Run chisq.test of agecat by shellcat
tableageshell <- ___ %>%
with(___)
chisq.test(___)
# Make mosaicplot of agecat by shellcat
mosaicplot(___ ~ ___, data = ___,
color = c(___, ___),
main = ___)