## Taken from the gg_roc example
# rfsrc_iris <- rfsrc(Species ~ ., data = iris)
data(rfsrc_iris)
gg_dta <- calc_roc(rfsrc_iris, rfsrc_iris$yvar,
which.outcome=1, oob=TRUE)
gg_dta <- calc_roc(rfsrc_iris, rfsrc_iris$yvar,
which.outcome=1, oob=FALSE)
rf_iris <- randomForest(Species ~ ., data = iris)
gg_dta <- calc_roc(rf_iris, rf_iris$yvar,
which.outcome=1)
gg_dta <- calc_roc(rf_iris, rf_iris$yvar,
which.outcome=2)
Run the code above in your browser using DataLab