（漂亮）打印C5.0 ruleModel作为树？

Question

如果我训练像

这样的C5.0规则模型

ruleModel <- C5.0(churn ~ ., data = churnTrain, rules = TRUE)

我用summary(ruleModel)打印出来，我得到规则。如何在不使用重新训练

的情况下打印底层树

treeModel <- C5.0(churn ~ ., data = churnTrain, rules = FALSE)

（换句话说，我不想要使用summary(treeModel) - 在我的案例中训练模型需要相当长的时间，而且我已经训练了{{1 }}。）

我注意到ruleModel和ruleModel是列表，但是treeModel还有其他条目“Terms”和“xlevels”，并且还有一些差异（在treeModel中找到）具有相同名称的列表条目。我可以将这些模型相互转换或是否有其他打印方式？如何将ruleModel打印为树？

奖励：相当于all.equal的内容，打印C5.0对象。