## Not run: ------------------------------------
# lrn = makeLearner("classif.rpart", predict.type = "prob")
# mod = train(lrn, sonar.task)
# pred = predict(mod, sonar.task)
# pvs = generateThreshVsPerfData(pred, list(tpr, fpr))
# plotThreshVsPerfGGVIS(pvs)
## ---------------------------------------------
Run the code above in your browser using DataLab