데이터마이닝 - 분류나무모형

install.packages("SemiPar") install.packages("tree") library(SemiPar) library(tree) data(fuel.frame) fuel.frame fuel.tr = tree(Fuel~Weight+Disp.+Type, data=fuel.frame) # 연비가 좋은 것을 찾음음 fuel.tr plot(fuel.tr) text(fuel.tr) fuel.tr.cv = cv.tree(fuel.tr, FUN=prune.tree) # 타당성 검증증 fuel.tr.cv plot(fuel.tr.cv) fuel.tr.size6 = prune.tree(fuel.tr, best = 6) fuel.tr.size6 plot(fuel.tr.size6, type="u") text(fuel.tr.size6) predict(fuel.tr.size6, fuel.frame) # 예측값 산출...