# install.packages("rpart.plot")
library(rpart.plot)
# install.pacakges("rpart")
library(rpart)
## 모델 경로는 한글이 섞이지 않은 영어로!
# saving the model
saveRDS(model, file = "경로/model.rda")
# loading the model
model_old = readRDS(file = "경로/model.rda")
model <- model_old
데이터의 크기(nrow)가 크거나, 모델이 복잡하여 학습하는데 오래 걸리거나, 조건이 많아 최적의 모델을 찾기까지 오래걸린다면 위의 방법을 써서 시간을 절약 할 수 있을 것이당.
팬입니다 항상 응원해요!