摩托车撞击数据：非线性方法
现在请使用 mgcv 包中的 gam() 函数，对同一份 mcycle 数据拟合一个非线性模型。
本练习是课程的一部分
R 中的广义可加模型（GAM）非线性建模
练习说明
- 加载
mgcv包。 - 使用
gam()函数，在mcycle数据上拟合一个模型，使accel与times之间呈平滑的非线性关系。 - 使用已提供的
plot()调用来可视化模型拟合结果。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Load mgcv
___
# Fit the model
gam_mod <- gam(___ ~ s(___), data = mcycle)
# Plot the results
plot(gam_mod, residuals = TRUE, pch = 1)