r - 如何在 R 中的 Ada boosting 包的迭代中构建决策树？

Question

我使用 R 中的“ada”包构建了一个包含 50 个决策树的提升模型。如何打印在“ada”迭代中构建的决策树？

我可以使用“打印”功能来显示“rpart”对象的详细信息，是否有任何类似的功能可以打印“ada”对象中构建的决策树？

非常感谢你！

我的示例代码如下：

    library(ada)
    data("soldat")
    model <- ada(y ~ .
               , data=soldat
               , loss="e"
               , type="discrete"
               , iter=50
               , control=rpart.control(cp=-1, maxdepth=2))

Answer 1

树存储在列表中model$model$trees 这些是rpart对象，因此您可以使用print等plot，就像调用时一样rpart。

因此，例如绘制第五棵树：

plot(model$model$trees[[5]])
text(model$model$trees[[5]])