Kategori usia menurut kategori berat cangkang
Sebelumnya, di bab 2, Anda membuat agecat untuk abalone dengan usia lebih muda dari 10,5 tahun (dikodekan sebagai "< 10.5") dibandingkan dengan yang berusia 10,5 tahun dan lebih tua (dikodekan sebagai "10.5 and older"). Mari kita bagi juga berat cangkang abalone ke dalam kategori sama dengan atau lebih rendah dari 0,235 gram dibandingkan dengan yang berbobot lebih dari 0,235 gram.
Himpunan data abaloneKeep dengan agecat telah dimuat untuk Anda beserta paket dplyr.
Latihan ini adalah bagian dari kursus
R untuk Pengguna SAS
Petunjuk latihan
- Gunakan fungsi
ifelse()untuk menambahkanshellcatkeabaloneKeepuntuk pemisahan berat cangkang menjadi 2 kategori di atas dan di bawah 0,235 g, berlabel"<= 0.235g"dan"> 0.235g". - Buat tabel kontingensi bernama
tableageshelldarichisq.test()untukagecatmenurutshellcat. Jalankanchisq.test()padatableageshell. - Buat mosaic plot
agecatmenurutshellcat. Gunakan warna"light blue"dan"grey". Atur judul menjadi"Mosaicplot of age by shell categories".
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# 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 = ___)