Plots a ROC curve using ggplot2.

Source: R/generateThreshVsPerf.R

Plots a ROC curve from predictions.

plotROCCurves(obj, measures, diagonal = TRUE, pretty.names = TRUE,
  facet.learner = FALSE)

Arguments

obj	(ThreshVsPerfData) Result of generateThreshVsPerfData.
measures	([list(2)` of Measure) Default is the first 2 measures passed to generateThreshVsPerfData.
diagonal	(logical(1)) Whether to plot a dashed diagonal line. Default is TRUE.
pretty.names	(logical(1)) Whether to use the Measure name instead of the id in the plot. Default is TRUE.
facet.learner	(logical(1)) Weather to use facetting or different colors to compare multiple learners. Default is FALSE.

Value

ggplot2 plot object.

See also

Other plot: createSpatialResamplingPlots, plotBMRBoxplots, plotBMRRanksAsBarChart, plotBMRSummary, plotCalibration, plotCritDifferences, plotLearningCurve, plotPartialDependence, plotResiduals, plotThreshVsPerf

Other thresh_vs_perf: generateThreshVsPerfData, plotThreshVsPerf

Examples

lrn = makeLearner("classif.rpart", predict.type = "prob")
fit = train(lrn, sonar.task)
#> Error: Please use column names for `x`
pred = predict(fit, task = sonar.task)
#> Error in predict(fit, task = sonar.task): object 'fit' not found
roc = generateThreshVsPerfData(pred, list(fpr, tpr))
#> Error in generateThreshVsPerfData(pred, list(fpr, tpr)): object 'pred' not found
plotROCCurves(roc)
#> Error in checkClass(x, classes, ordered, null.ok): object 'roc' not found

r = bootstrapB632plus(lrn, sonar.task, iters = 3)
#> Resampling: OOB bootstrapping
#> Measures:             mmce.train   mmce.test    
#> [Resample] iter 1:    0.1057692    0.3648649    
#> [Resample] iter 2:    0.1250000    0.3333333    
#> [Resample] iter 3:    0.0913462    0.3076923    
#> 
#> Aggregated Result: mmce.b632plus=0.2917770
#> 
roc_r = generateThreshVsPerfData(r, list(fpr, tpr), aggregate = FALSE)
plotROCCurves(roc_r)

r2 = crossval(lrn, sonar.task, iters = 3)
#> Resampling: cross-validation
#> Measures:             mmce      
#> [Resample] iter 1:    0.2318841 
#> [Resample] iter 2:    0.2428571 
#> [Resample] iter 3:    0.2028986 
#> 
#> Aggregated Result: mmce.test.mean=0.2258799
#> 
roc_l = generateThreshVsPerfData(list(boot = r, cv = r2), list(fpr, tpr), aggregate = FALSE)
plotROCCurves(roc_l)