性別ごとの最良モデル
前の演習では、shuckedWeight または shellWeight から年齢を予測しました。r.squared が最も高かったのは shellWeight で、age の予測がより良好でした。
この演習では、アワビのそれぞれの性別（"I"、"F"、"M"）について、shellWeight による age の単回帰を3回実行します。各 lm() の結果を保存し、r.squared などのモデル適合度統計量を比較します。
abaloneKeep データセットと dplyr パッケージは読み込まれており、各モデルの当てはまりを示すプロットも用意されています。
この演習はコースの一部です
SAS ユーザーのための R
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Save model output and output of model summary for infants
modelInfants <- lm(___ ~ ___, data = ___, subset = ___)
summaryInfants <- summary(___)