|
本帖最后由 MrLonely 于 2014-4-3 20:08 编辑
[eval] library(RWeka)
[eval] library(party)
[eval] a <- read.csv('ooo.csv',header=T)
[eval] m1 <- J48(AutavauxTV ~ ., data = a)
[eval] table(a$AutavauxTV, predict(m1))
[eval] write_to_dot(m1)
[eval] jpeg(file = 'ooo.jpg')
[eval] if(require('party', quietly = TRUE)) plot(m1)
[error] Error in UseMethod("as.party") :
no applicable method for 'as.party' applied to an object of class "c('J48', 'Weka_tree', 'Weka_classifier')"
if(require('party', quietly = TRUE)) plot(m1)
[eval] dev.off()
以上的红色加粗字体为报错信息,求大神指导!
|
|