Ajustar la complejidad del modelo de motocicletas

El número de funciones base en un smooth influye mucho en las formas que puede adoptar un modelo. Aquí vas a practicar cómo modificar el número de funciones base en un modelo y examinar los resultados.

Este ejercicio forma parte del curso

Modelado no lineal con Generalized Additive Models (GAMs) en R

Ver curso

Instrucciones del ejercicio

Ajusta un GAM con 3 funciones base a los datos mcycle, con accel como función smooth de times.
Ajusta el mismo GAM de nuevo, pero esta vez con 20 funciones base.
Usa las funciones plot() proporcionadas para visualizar ambos modelos.

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

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)

Editar y ejecutar código