我使用rpart函数使用预测变量X1，...，X6构建变量Y的递归分区回归树（test2）。我想在将summary()调用到文本文件时编写（格式化的）摘要信息。
作为示例，这是我想在输出文件中使用的内容：
> cont.parms.Y <- rpart.control(minsplit=10,cp=0.011)
> test2 <-rpart(Y ~ X1 + X2 + X3 + X4 + X5 + X6,cont.parms.Y)
> summary(test2)
print screen of the desired output
当我输入write.table(matrix(test2),file='output.txt')时，我会得到输出结果的网格，如链接图像所示。
