diff --git a/trainbenchmark/trainbenchmark-reporting/combined.R b/trainbenchmark/trainbenchmark-reporting/combined.R index 015c2c92abdd2c80c588ae9af44a627f47a7b32d..ddd13d8eebe4e7d13b260a2679fee803ba41ce6c 100644 --- a/trainbenchmark/trainbenchmark-reporting/combined.R +++ b/trainbenchmark/trainbenchmark-reporting/combined.R @@ -186,7 +186,7 @@ for (scenario in c("inject", "repair")) { fnTmp <- paste("../diagrams/recent/benchmark/", scenario, "/", phase.filename, "-", scenario, "-tmp.pdf", sep="") fn <- paste("../diagrams/recent/benchmark/", scenario, "/", phase.filename, "-", scenario, ".pdf", sep="") if (phase == "Read") { - p = p + scale_y_log10(breaks = ybreaks, minor_breaks=NULL, labels = ylabels, limits = c(1e0,3e4), expand = c(0, 0)) + + p = p + scale_y_log10(breaks = ybreaks, minor_breaks=NULL, labels = ylabels, limits = c(3e0,3e4), expand = c(0, 0)) + scale_colour_manual(values = c( "#56B4E9", "#56B4E9", # Sky blue - Name Lookup "#009E73", "#009E73", # Bluish green - Intrinsic References "#0072B2", "#0072B2", # Blue - Manual Serialization @@ -225,7 +225,7 @@ for (scenario in c("inject", "repair")) { # legend.key = element_blank(), legend.title = element_blank(), strip.text.x = element_blank(), - legend.position = "right", # "none", # + legend.position = "none", # "none", # axis.text = element_text(size = 9) #, panel.grid.minor = element_blank() ) @@ -241,7 +241,7 @@ for (scenario in c("inject", "repair")) { ggsave( plot = p, filename = fnTmp, - width = 200, + width = 160, height = 100, units = "mm" )