НачатьНачать бесплатно

Проверка размерных измерений

К этому моменту вы уже удалили 2 наблюдения с высотой моллюска 0 мм, которые были измерены некорректно, а также 4 наблюдения, в которых shuckedWeight оказался больше wholeWeight, что логически невозможно и, скорее всего, является ошибкой записи. Набор данных abaloneKeep, загруженный для этого упражнения, теперь содержит 4177 - 2 - 4 = 4171 наблюдение.

Помимо этого, необходимо проверить согласованность размерных измерений. Параметр length (длина раковины в мм) определён как наибольший линейный размер раковины. Следовательно, length должен всегда быть больше height и diameter. Сейчас вы проверите это условие с помощью диаграммы рассеяния с референсной линией Y=X, а затем удалите наблюдения, не удовлетворяющие условию для length.

Набор данных abaloneKeep, а также пакеты dplyr и ggplot2 уже загружены.

Это упражнение является частью курса

R для пользователей SAS

Посмотреть курс

Инструкции к упражнению

  • Постройте диаграмму рассеяния: length по оси X, height по оси Y, и добавьте референсную линию Y=X с точкой пересечения 0 и наклоном 1.
  • Постройте диаграмму рассеяния: length по оси X, diameter по оси Y, и добавьте референсную линию Y=X с точкой пересечения 0 и наклоном 1.
  • Обновите abaloneKeep, оставив только те наблюдения, в которых length больше и height, и diameter.

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Make scatterplot of height by length add y=x line
ggplot(___) +
  ___ + 
  ___

# Make scatterplot of diameter by length add y=x line
ggplot(___) +
  ___ + 
  ___

# Keep abalones with length > both height and diameter
abaloneKeep <- abaloneKeep %>%
  filter((___) & (___))
Редактировать и запускать код