出力J48ツリーのテキストファイルR

Question

J48()の機能を使用してchurnデータセットのdecision treeを取得しました。RWekaパッケージの機能です。木は本当に大きいので、私は木全体を見ることができません。私はそれをテキストファイルで出力したいが、フォーマットは変更されている。ツリー形式を維持してどのように保存できますか？

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

m2私はJ48ツリーの出力を格納していたにdataframeあります。

Answer 1

I. RWekaのJ48()機能を使用してirisデータセットを使用した例。

 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 

II。 sink()関数を使用してテキストファイルに書き込みます。

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

III。現在の作業ディレクトリに保存されているresult.txtを開きます。