Datos de accidentes de motocicleta: enfoque no lineal

Ahora vas a ajustar un modelo no lineal a los mismos datos de mcycle usando la función gam() del paquete mgcv.

Este ejercicio forma parte del curso

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

Carga el paquete mgcv.
Ajusta un modelo a los datos de mcycle donde accel tenga una relación suave y no lineal con times usando la función gam().
Visualiza el ajuste del modelo usando la llamada a plot() proporcionada.

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

# Load mgcv
___

# Fit the model
gam_mod <- gam(___ ~ s(___), data = mcycle)

# Plot the results
plot(gam_mod, residuals = TRUE, pch = 1)