当改变平均值=”时,为什么我要使用ROCR来绘制性能曲线图来获得不同的树性能曲线图;门槛“;至;无”;
在使用rpart创建了一个简单的决策树之后,我想使用ROCR绘制性能。当我改变avg=参数时,ROC曲线发生显著变化 当我使用相同的方法和更改来绘制GLM模型的性能时,没有任何更改。为什么此参数仅影响树形图以及以何种方式影响树形图当改变平均值=”时,为什么我要使用ROCR来绘制性能曲线图来获得不同的树性能曲线图;门槛“;至;无”;,r,roc,rpart,R,Roc,Rpart,在使用rpart创建了一个简单的决策树之后,我想使用ROCR绘制性能。当我改变avg=参数时,ROC曲线发生显著变化 当我使用相同的方法和更改来绘制GLM模型的性能时,没有任何更改。为什么此参数仅影响树形图以及以何种方式影响树形图 # create tree model bsprp <- mean(df.sub.train$y) target <- y_fact ~ age + gender + a + b + c + d m.dt <- rpart(target,
# create tree model
bsprp <- mean(df.sub.train$y)
target <- y_fact ~ age + gender + a + b + c + d
m.dt <- rpart(target,
data = df.sub.train,
parms=list(prior=c(bsprp,1-bsprp)), cp=0.005)
# predict on df.sub.vld
dt.predicted <- predict(m.dt, newdata = df.sub.vld)
dt.pred <- prediction(dt.predicted[,2],df.sub.vld$y)
dt.perf <- performance(dt.pred, "tpr", "fpr")
# plot performance
plot(dt.perf, avg= "threshold", col="red", lwd= 2, main= "ROC curve")
abline(0, 1, untf = FALSE, col = "lightgray", lty = 2)
# vs
plot(dt.perf, avg= "none", col="red", lwd= 2, main= "ROC curve")
abline(0, 1, untf = FALSE, col = "lightgray", lty = 2)
不同情节的屏幕截图:
如果您能提供一个可复制的示例,这将有所帮助。有关更多信息,请参阅。如果您能提供一个可复制的示例,将有所帮助。有关更多信息,请参阅。
y_fact y age gender bf2 a b c
5 1 1 71.11233 Male 40 6 0 0
10 1 1 51.83836 Male 11 5 3 0
13 1 1 70.14521 Female 7 3 1 0
15 1 1 40.00548 Male 64 6 0 0
16 1 1 55.81096 Male 55 8 1 0
19 1 1 54.45479 Male 13 3 1 0