按性别选择最佳模型
在上一个练习中，您用 shuckedWeight 或 shellWeight 来预测 age。shellWeight 的 r.squared 最高，对 age 的预测效果更好。
本练习中，请分别针对 3 种鲍鱼性别（"I"、"F"、"M"），各运行一次以 shellWeight 预测 age 的简单线性回归。保存每个 lm() 模型的结果，并比较模型拟合统计量，如 r.squared。
已为您加载 abaloneKeep 数据集和 dplyr 包，并提供了每个模型拟合的绘图。
本练习是课程的一部分
面向 SAS 用户的 R
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Save model output and output of model summary for infants
modelInfants <- lm(___ ~ ___, data = ___, subset = ___)
summaryInfants <- summary(___)