R:绘制C5.0决策树的问题

时间:2019-05-29 20:22:20

标签: r c5.0

当我尝试绘制树时,出现“ if(!n.cat [i]){错误:在需要TRUE / FALSE时缺少值”的错误。这是代码:

credit <- read.csv ("https://raw.githubusercontent.com/dataspelunking/MLwR/master/Machine%20Learning%20with%20R%20(2nd%20Ed.)/Chapter%2005/credit.csv",
                  row.names = NULL, 
                  stringsAsFactors = TRUE)

set.seed(123)
train_sample <- sample(1000, 900)
credit_train <- credit[train_sample, ]

library(C50)
credit_model <- C5.0(credit_train[-c(17)], credit_train$default)
plot(credit_model)

有什么方法可以绘制这棵树吗?

当我删除其中一个变量时,会绘制树,但输出与summary()不匹配:

credit_model2 <- C5.0(credit_train[-c(14,17)], credit_train$default)
summary(credit_model2)
pdf("rplot.pdf", height=30, width = 100) ; plot(credit_model2); dev.off()

尤其是,树中的顶部拆分基于具有4个级别的因子,称为checking_balance。摘要显示拆分已开始:

{p> 200 DM中的

checking_balance,未知}:否(412/50) {<0 DM,1-200 DM}中的checking_balance:

但是图片显示了> 200 DM的拆分与未知,并且在拆分中没有提到<0或1-200 DM因子水平。

剧情是坏了还是我不理解输出?

0 个答案:

没有答案