Dados de acidente de motocicleta: abordagem não linear

Agora você vai ajustar um modelo não linear aos mesmos dados mcycle usando a função gam() do pacote mgcv.

Este exercicio faz parte do curso

Modelagem Não Linear com Generalized Additive Models (GAMs) em R

Carregue o pacote mgcv.
Ajuste um modelo aos dados mcycle em que accel tenha uma relação suave e não linear com times usando a função gam().
Visualize o ajuste do modelo usando a chamada plot() fornecida.

Tente este exercicio completando este código de exemplo.

# Load mgcv
___

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

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