diff options
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") |