檢查尺寸量測
到目前為止,你已經移除了 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((___) & (___))