##
## Taken from the gg_roc example
rfsrc_iris <- rfsrc(Species ~ ., data = iris)
#data(rfsrc_iris)
## Not run:
# gg_dta <- gg_roc(rfsrc_iris, which.outcome=1)
#
# calc_auc(gg_dta)
# ## End(Not run)
gg_dta <- gg_roc(rfsrc_iris, which.outcome=2)
calc_auc(gg_dta)
Run the code above in your browser using DataLab