Skip to content

Instantly share code, notes, and snippets.

@zmjones
zmjones / example.R
Last active August 29, 2015 14:26
new function plotROCCurves and argument aggregate to generateThreshVsPerfData
devtools::load_all()
lrn = makeLearner("classif.rpart", predict.type = "prob")
fit = train(lrn, sonar.task)
pred = predict(fit, task = sonar.task)
roc = generateThreshVsPerfData(pred, list(fpr, tpr))
plotROCCurves(roc)
r = bootstrapB632plus(lrn, sonar.task, iters = 3)
roc_r = generateThreshVsPerfData(r, list(fpr, tpr), aggregate = FALSE)