모델 진단으로 문제 해결하기
gam.check()의 결과를 바탕으로 모델을 업데이트해 성능을 개선할 수 있어요.
이 연습은 강의의 일부입니다
R로 배우는 Generalized Additive Models (GAMs): 비선형 모델링
연습 안내
mod에 대해 모델 진단을 실행하세요.- 진단 결과에 따라, 실패한 스무스의 기저 함수 수(
k)를 변경해mod2로 다시 적합하세요. - 문제가 해결되었는지 확인하기 위해
mod2에도 모델 진단을 실행하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
library(mgcv)
# Fit the model
mod <- gam(y ~ s(x0, k = 3) + s(x1, k = 3) + s(x2, k = 3) + s(x3, k = 3),
data = dat, method = "REML")
# Check the diagnostics
___
# Refit to fix issues
mod2 <- gam(y ~ s(x0, k = ___) + s(x1, k = ___) + s(x2, k = ___) + s(x3, k = ___),
data = dat, method = "REML")
# Check the new model
___