如何在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