Как посчитать наблюдения, попадающие в каждый узел дерева
В настоящее время я занимаюсь данными о винах в пакете MMST. Я разбил весь набор данных на обучение и тестирование и построил дерево, как показано в следующих кодах:
library("rpart")
library("gbm")
library("randomForest")
library("MMST")
data(wine)
aux <- c(1:178)
train_indis <- sample(aux, 142, replace = FALSE)
test_indis <- setdiff(aux, train_indis)
train <- wine[train_indis,]
test <- wine[test_indis,] #### divide the dataset into trainning and testing
model.control <- rpart.control(minsplit = 5, xval = 10, cp = 0)
fit_wine <- rpart(class ~ MalicAcid + Ash + AlcAsh + Mg + Phenols + Proa + Color + Hue + OD + Proline, data = train, method = "class", control = model.control)
windows()
plot(fit_wine,branch = 0.5, uniform = T, compress = T, main = "Full Tree: without pruning")
text(fit_wine, use.n = T, all = T, cex = .6)
И я мог бы получить изображение как это:
Что означает число под каждым узлом (например, 0/1/48 под Гриньолино)? Если я хочу знать, сколько обучающих и тестовых образцов попадает в каждый узел, что я должен написать в кодах?