- ft <- AUCRF(class~., data=tw)
>
什么原因啊,还有AUCRF函数式可以用于对特征变量的选取对吧?
- > AUCRF
- function (formula, data, k0 = 1, pdel = 0.2, ranking = c("MDG",
- "MDA"), ...)
- {
- AUC.randomForest <- function(rf, clase = 1) {
- r <- rank(rf$votes[, as.character(clase)])
- rd <- mean(r[rf$y == clase])
- nd <- sum(rf$y == clase)
- nnd <- length(rf$y) - nd
- return((rd - nd/2 - 0.5)/nnd


雷达卡



京公网安备 11010802022788号







