Update 4f.Analysis-ApproachComparison_PD-SICR.R

arnobotha · Aug 11, 2024 · f3f8426 · f3f8426
1 parent d986769
commit f3f8426
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Scripts/4f.Analysis-ApproachComparison_PD-SICR.R b/Scripts/4f.Analysis-ApproachComparison_PD-SICR.R
@@ -67,7 +67,7 @@ for (i in 1:length(vThresholds)) {
   vAUCs[i] <- vROCs[[i]]$auc
   cat(paste0("AUC for threshold u=", vThresholds[i],": ", round(vAUCs[i], digits=2),"%\n"))
 }
-plot(vAUCs, vThresholds, type="b")
+plot(vThresholds, vAUCs, type="b")
 
 ### RESULTS:
 # On a 100% threshold, the AUC is 65.49%, which is the best performing