시작하기무료로 시작하기

오토바이 모델의 복잡도 설정

스무스에서 기저함수의 개수는 모델이 가질 수 있는 형태에 큰 영향을 줍니다. 여기서는 모델의 기저함수 개수를 바꾸고, 그 결과를 살펴보는 연습을 하겠습니다.

이 연습은 강의의 일부입니다

R로 배우는 Generalized Additive Models (GAMs): 비선형 모델링

강의 보기

연습 안내

  • mcycle 데이터에 대해 times의 스무스 함수로 accel을 모형화하는, 기저함수 3개짜리 GAM을 적합하세요.
  • 같은 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)
코드 편집 및 실행