我确实有下一个麻烦:
我使用基于rpart库的R创建了一个决策树,因为我有一个广泛的变量列表,所以规则是无用的列表。
通过使用rattle库中的asRules(tree)
,结果比计算树计算后运行tree
更好。
问题是规则集比控制台的可打印行数多,所以我不能通过Control + C复制它们,并将此结果保存到变量中,例如:
t <- asRules(tree)
我希望像
这样的东西 Rule number: 1 [target=0 cover=500 (4%) prob=0.8]
var1 < 10
var2 < 2
var3 >=45
var4 >=5
尽管结果是
[1] 297 242 295 126 127 124
显然这不是我想要的。
所以我理解3种解决方法:
增加可打印行的限制以从控制台访问(我不知道该怎么做)。
在控制台中打印,按键继续,以便先复制,然后粘贴,然后按下按钮以获得下一个结果(我不知道该怎么做)。
能够将一堆规则保存到txt文件或类似的内容而不是[1] 297 242 295 126 127 124
。
伙计们,非常感谢任何帮助!
谢谢!
答案 0 :(得分:1)
#3使用
sink(file='somefile.txt')
asRules(tree)
sink()