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

我已经使用decision tree包中的churn函数为J48()数据集设置了RWeka。那棵树真的很大，所以我看不见整棵树。我想将其输出到文本文件中，但是格式正在更改。如何保存它并保留树格式。

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

m2是我要存储dataframe树输出的J48。

最佳答案

I.使用iris的RWeka函数设置J48()数据的示例。

      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()函数将其写入文本文件

      sink("result.txt")
      print (result)
      sink()

三，打开保存在当前工作目录中的result.txt。

关于r - 在R中的文本文件中输出J48树，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/38751761/