如何在train（）方法=“ treebag”中发现“出包错误”

Question

如何使用method =“ treebag”从train（）函数中提取错误信息。

control = trainControl（method =“ cv”，number = 10）bag = train（X_train，as.factor（y_train），method =“ treebag”，trControl = control，verbose = F）

遇到“ ipred”包装中的一个“ coob”选项，以摆脱错误。 请协助。

请问下面的步骤是找到OOB的正确方法吗？ oob = table（y_train，predict（btree $ finalModel，X_train，OOB = T））sum（diag（as.matrix（oob）））/ nrow（X_train）

Answer 1

有一些不同模型的内置代码（以便您可以使用trainControl(method = "oob") ）。

请注意，您需要设置keepX选项：

> library(caret)
> 
> set.seed(422)
> dat <- twoClassSim(100)
> 
> mod <- train(Class ~ ., data = dat, method = "treebag",
+              trControl = trainControl(method = "none"),
+              # you'll need this to bass to the bagging function
+              keepX = TRUE)
> 
> tb_code <- getModelInfo("treebag")[[1]]
> tb_code$oob(mod$finalModel)
  Accuracy      Kappa AccuracySD    KappaSD 
0.72787041 0.45005686 0.08011663 0.16212862