设置摩托车模型的复杂度
光滑项中的基函数数量会极大影响模型可呈现的形状。在这里，您将练习修改模型中的基函数数量并检查结果。
本练习是课程的一部分
R 中的广义可加模型（GAM）非线性建模
练习说明
- 拟合一个对
mcycle数据使用 3 个基函数的 GAM，使accel作为times的光滑函数。 - 再次拟合相同的 GAM，但这次使用 20 个基函数。
- 使用提供的
plot()函数可视化两个模型。
交互式实操练习
通过完成这段示例代码来试试这个练习。
library(mgcv)
# Fit a GAM with 3 basis functions
gam_mod_k3 <- gam(accel ~ s(times, k = ___), data = mcycle)
# Fit with 20 basis functions
gam_mod_k20 <- gam(___)
# Visualize the GAMs
par(mfrow = c(1, 2))
plot(gam_mod_k3, residuals = TRUE, pch = 1)
plot(gam_mod_k20, residuals = TRUE, pch = 1)