[R] 수치 예측 목적의 러신머닝

앙상블 기법(랜덤 포레스트 기법 사용)

library(randomForest)

set.seed(1)

x=sample(1:100,10,replace=F)
x

 

---

Boston 데이터 활용하기

set.seed(1)

rf_model<-randomForest(medv~.,data=Boston_train, mtry=6, importance=T)
rf_model

~. : 모든 종속변수를 선택한다
mtry : 설명변수 개수 설정
importance : 변수 중요도 평가

---

🟢데이터 시각화

plot(rf_model)

importance(rf_model)

varImpPlot(rf_model)

 

---

 

평가 데이터 이용하여 예측결과 생성

rf_pdt=predict(rf_model,newdata = Boston_test)

예측값과 실제값 사이에 평균제곱오차 계산

kk=mean((rf_pdt-Boston_test$medv)^2)
kk

sqrt(kk)

---