与randomForest.getTree等效的插入符号包

我一直在使用randomForest.getTree为我的林中的每一棵树提供文本表示，但最近已切换到caret包来训练林（method='rf'）。我如何获取randomForest.getTree能够理解的对象（因为caret据称使用的是相同的底层代码），或者以其他类似的方式打印出树？

刚刚解决了这个问题：

library(caret)
.... #load data
model <- train(x,y,method='rf')
getTree(model$finalModel)

库（插入符号）
.... #加载数据
模型