不合逻辑的重量
移除高度为 0 mm 的鲍鱼只是第一步。在本练习中,您还将检查鲍鱼的各组成部分重量。wholeWeight 是鲍鱼的总重量(单位:克),包含鲍鱼肉和贝壳的重量。因此,wholeWeight 应该大于 shuckedWeight、visceraWeight 和 shellWeight。
正如您在前面的练习中所见,有一些 pctShucked 大于 100%,这表明存在 shuckedWeight 大于 wholeWeight 的情况。本练习中,您将回顾并可视化这些情况,然后将它们从数据集 abaloneKeep 中移除。abaloneKeep 已从上一练习加载,同时也已加载 dplyr 和 ggplot2 包。
本练习是课程的一部分
面向 SAS 用户的 R
练习说明
- 按
pctShucked对abaloneKeep排序,从abaloneKeep中提取pctShucked并查看末尾 6 行。 - 绘制散点图:x 轴为
wholeWeight,y 轴为shuckedWeight,添加截距为 0、斜率为 1 的geom_abline()。 - 使用
dplyr包的filter()保留shuckedWeight小于wholeWeight的观测。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Sort abaloneKeep by pctShucked, view largest 6 pctShucked
abaloneKeep %>%
___ %>%
___ %>%
___
# Scatterplot of shuckedWeight by wholeWeight add y=x line
ggplot(___) +
___ +
___
# Keep cases where shuckedWeight is less than wholeWeight
abaloneKeep <- abaloneKeep %>%
___