在 R 中的文本文件中输出 J48 树
Output J48 Tree in Text File in R
我使用 RWeka
包中的 J48()
函数获得了 churn
数据集的 decision tree
。这棵树真的很大,所以我看不到整棵树。我想将它输出到一个文本文件中,但格式正在改变。我怎样才能保存它保留树格式。
save(m2,file="thisexample.txt", ascii=TRUE)
m2
是我存储 J48
树输出的 dataframe
。
我。使用 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
二.使用sink()
函数将其写入文本文件
sink("result.txt")
print (result)
sink()
三。打开保存在当前工作目录中的result.txt
。
我使用 RWeka
包中的 J48()
函数获得了 churn
数据集的 decision tree
。这棵树真的很大,所以我看不到整棵树。我想将它输出到一个文本文件中,但格式正在改变。我怎样才能保存它保留树格式。
save(m2,file="thisexample.txt", ascii=TRUE)
m2
是我存储 J48
树输出的 dataframe
。
我。使用 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
二.使用sink()
函数将其写入文本文件
sink("result.txt")
print (result)
sink()
三。打开保存在当前工作目录中的result.txt
。