data(cobradata_example)
cobraperf <- calculate_performance(cobradata_example,
binary_truth = "status", aspects = "tpr")
cobraplot <- prepare_data_for_plot(cobraperf, colorscheme = "Dark2",
incltruth = TRUE)
plot_tpr(cobraplot)
Run the code above in your browser using DataLab