diff options
author | Christoph Helma <helma@in-silico.ch> | 2020-10-16 19:39:25 +0200 |
---|---|---|
committer | Christoph Helma <helma@in-silico.ch> | 2020-10-16 19:39:25 +0200 |
commit | 0b34eeae710600c2e145f5257eec08a785811adb (patch) | |
tree | d93917a428674f64fe59d9c2ec511f6e5430aac9 /scripts/roc.R | |
parent | b4f6729dfaf0cf2c9a2b4a6fcb5f4f0660000afe (diff) |
ROC plot updated for readability
Diffstat (limited to 'scripts/roc.R')
-rwxr-xr-x | scripts/roc.R | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/scripts/roc.R b/scripts/roc.R index afc8293..459252a 100755 --- a/scripts/roc.R +++ b/scripts/roc.R @@ -2,7 +2,9 @@ library(ggplot2) data <- read.csv("figures/roc.csv",header=T) p <- ggplot(data, aes(x=fpr, y=tpr)) + geom_abline() -p <- p + geom_label(label=rownames(data) ) +#p <- p + geom_label(label=rownames(data) ) +p <- p + geom_point(aes(color=rownames(data))) +p <- p + theme(legend.title=element_blank()) p <- p + expand_limits(x=c(0,1),y=c(0,1)) p <- p + labs(x = "False positive rate", y = "True positive rate") ggsave("figures/roc.png") |