开始使用免费开始使用

检查尺寸测量值

到目前为止，您已经移除了 2 个高度为 0 mm 的鲍鱼样本，这是测量错误。您还移除了 4 个 shuckedWeight 大于 wholeWeight 的样本，这在逻辑上不成立，可能是记录错误所致。本练习加载的 abaloneKeep 数据集现在只有 4177 - 2 - 4 = 4171 个样本。

此外，还需要检查尺寸测量之间的关系。鲍鱼的 length（单位：mm）被定义为贝壳的最长尺寸。因此，length 应当始终大于 height 或 diameter。现在，您将使用带有 Y=X 参考线的散点图来检查这一条件。然后，您将移除任何不满足该 length 条件的样本。

本练习已为您加载 abaloneKeep 数据集，以及 dplyr 和 ggplot2 包。

本练习是课程的一部分

面向 SAS 用户的 R

查看课程

练习说明

  • 绘制以 length 为 x 轴、height 为 y 轴的散点图，并添加截距为 0、斜率为 1 的 Y=X 参考线。
  • 绘制以 length 为 x 轴、diameter 为 y 轴的散点图，并添加截距为 0、斜率为 1 的 Y=X 参考线。
  • 更新 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((___) & (___))
编辑并运行代码