Лучшая модель по полу
В предыдущем упражнении вы предсказывали возраст по переменным shuckedWeight или shellWeight. Переменная shellWeight оказалась лучшим предиктором age — она дала наибольшее значение r.squared.
В этом упражнении постройте простую линейную регрессию age по shellWeight три раза — отдельно для каждого пола морского ушка ("I", "F", "M"). Сохраните результаты каждой модели lm() и сравните показатели качества подгонки, такие как r.squared.
Набор данных abaloneKeep и пакет dplyr уже загружены; график подгонки для каждой модели также подготовлен для вас.
Это упражнение является частью курса
R для пользователей SAS
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
# Save model output and output of model summary for infants
modelInfants <- lm(___ ~ ___, data = ___, subset = ___)
summaryInfants <- summary(___)