diff options
| author | Christoph Helma <helma@in-silico.ch> | 2021-02-17 23:11:49 +0100 |
|---|---|---|
| committer | Christoph Helma <helma@in-silico.ch> | 2021-02-17 23:11:49 +0100 |
| commit | 9d7b4aaff715e731ba81bf131dfaa9de5a9d0fdd (patch) | |
| tree | 7a84e5a702a1e0cb8d10c8512da822b2b8c9a5c1 /scripts/roc.R | |
| parent | 3bfc5bfb57e8f130b1b3d9a90fc34744278ef6b5 (diff) | |
cleanup, scripts adjusted, improved figures
Diffstat (limited to 'scripts/roc.R')
| -rwxr-xr-x | scripts/roc.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/roc.R b/scripts/roc.R index 459252a..281ab13 100755 --- a/scripts/roc.R +++ b/scripts/roc.R @@ -4,7 +4,7 @@ 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_point(aes(color=rownames(data))) -p <- p + theme(legend.title=element_blank()) +p <- p + theme(legend.title=element_blank(), legend.position="bottom") 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") |