我有一个数据集,可以查看一个人是否能成功获得贷款。
我正在运行一个提升算法,我的目标是尝试优化它,这里是代码:
#Boosting
JC.Boost <- boosting(Class ~. , data = JC.train, mfinal=10)
JCpred.boost <- predict.boosting(JC.Boost, newdata=JC.test)
# JCpred.boost
JCBoostpred <- prediction( JCpred.boost$prob[,2], JC.test$Class)
JCBoostperf <- performance(JCBoostpred,"tpr","fpr")
# calc auc (area under curve)
cauc = performance(cpred, "auc")
print(as.numeric(cauc@y.values))
如何优化算法以使AUC更高?我知道这是一个愚蠢的百万美元的问题,但我对从哪里开始感到困惑。
我已经尝试增加mfinal
,这增加了AUC值,但我之后就陷入了困境。任何想法都会有所帮助。
P.S。提升的代码几乎相同