Bắt đầu ngayBắt đầu miễn phí

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

Xem khóa học

Hướng dẫn bài tập

  • Dùng hàm ifelse() để thêm shellcat vào abaloneKeep, chia trọng lượng vỏ thành 2 nhóm trên và dưới 0.235g, gán nhãn "<= 0.235g""> 0.235g".
  • Tạo bảng chéo có tên tableageshell cho agecat theo shellcat, dùng cho chisq.test(). Chạy chisq.test() trên tableageshell.
  • Vẽ mosaic plot của agecat theo shellcat. Dùng màu "light blue""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 = ___)
Chỉnh sửa và Chạy Mã