在R中的文本文件中输出J48树

Question

我使用decision tree包中的churn函数获得了J48() RWeka数据集。树真的很大，因此我无法看到整棵树。我想在文本文件中输出它，但格式正在改变。如何保存它以保留树格式。

save(m2,file="thisexample.txt", ascii=TRUE)

m2是dataframe，我在其中存储J48树输出。

Answer 1

予。使用iris的{​​{1}}函数设置RWeka数据的示例。

J48()

II。使用 library(RWeka) result = J48(Species~.,data=iris) result # J48 pruned tree # ------------------ # Petal.Width <= 0.6: setosa (50.0) # Petal.Width > 0.6 # | Petal.Width <= 1.7 # | | Petal.Length <= 4.9: versicolor (48.0/1.0) # | | Petal.Length > 4.9 # | | | Petal.Width <= 1.5: virginica (3.0) # | | | Petal.Width > 1.5: versicolor (3.0/1.0) # | Petal.Width > 1.7: virginica (46.0/1.0) # Number of Leaves : 5 # Size of the tree : 9 函数将其写入文本文件

sink()

III。打开保存在当前工作目录中的 sink("result.txt") print (result) sink() 。