rm redundant evaluation code, not used in plotting or consider exposing options to user

[egouldo]

    dplyr::mutate(AUC = round(AUC, digits = 3)) %>% 

In file R/confidence_score_plots.R

aggreCAT/R/confidence_score_plots.R

Line 171 in 3404472

ggplot2::theme(

Also consider rm redundant code that performs Cs evaluation. not used anywhere. Either expose option to user so can print eval scores for each method on plot, or rm.

replicated_outcome = ifelse(outcome == 1, "TRUE", "FALSE") #TODO not clear why this is necessary, it's just creating a logical of outcome?

evaluated_outcomes <- aggreCAT::confidence_score_evaluation( #TODO this is a bit redundant, but it generates the AUC and Brier Score for the plot annotation, which is useful for interpretation of the heatmap

dplyr::mutate(AUC = round(AUC, digits = 3)) %>% #TODO #85 rm redundant, not used in plotting, but useful for interpretation of the heatmap, consider exposing in the output of the function