Возрастные категории в разрезе категорий веса раковины
Ранее, во второй главе, вы создали переменную agecat для моллюсков в возрасте младше 10,5 лет (с кодом "< 10.5") и для тех, кто достиг этого возраста или старше (с кодом "10.5 and older"). Теперь разобьём вес раковины моллюска на категории: не более 0,235 г и более 0,235 г.
Набор данных abaloneKeep с переменной agecat уже загружен, а также подключён пакет dplyr.
Это упражнение является частью курса
R для пользователей SAS
Инструкции к упражнению
- С помощью функции
ifelse()добавьте вabaloneKeepпеременнуюshellcat, разбивающую вес раковины на две категории — выше и ниже 0,235 г — с метками"<= 0.235g"и"> 0.235g". - Создайте таблицу сопряжённости
tableageshellс помощьюchisq.test()дляagecatпоshellcat. Запуститеchisq.test()дляtableageshell. - Постройте мозаичный график зависимости
agecatотshellcat. Используйте цвета"light blue"и"grey". Задайте заголовок"Mosaicplot of age by shell categories".
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
# 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 = ___)