install.packages("C50")
library(C50)
iris

set.seed(3598)
idx = sample(1:nrow(iris), size = nrow(iris) * 0.8)
idx

# 데이터 분리.
train_data = iris[idx,]
train_data

c5_options = C5.0Control(noGlobalPruning = T, CF = 0.25)
model2 = C5.0(Species ~., data = train_data, control = c5_options)
summary(model2)


