Skip to content
Snippets Groups Projects
Commit ba71777e authored by René Schöne's avatar René Schöne
Browse files

Faster generation of diagrams for poster.

parent 67761dc5
Branches
No related tags found
No related merge requests found
function make() {
echo "Make $1"
unlink diagrams/recent
unlink results/recent
( cd diagrams && ln -s $1 recent )
( cd results && ln -s $1 recent )
./gradlew plotIndividual
}
make inject
make repair
target=~/git/v-papers/runtime-rags-slides/images/slides-
# target=~/git/v-papers/runtime-rags-slides/images/
for workload_directory in repair inject
do
for phase in Read-and-Check Transformation-and-Recheck
do
for query in ConnectedSegments RouteSensor
do
cp diagrams/$workload_directory/$phase-$query-embed.pdf $target$workload_directory-$phase-$query.pdf;
done
done
done
# cp diagrams/repair/Read-and-Check-ConnectedSegments-embed.pdf $target/images/Read-and-Check-ConnectedSegments.pdf
# cp diagrams/repair/Read-and-Check-RouteSensor-embed.pdf $target/images/Read-and-Check-RouteSensor.pdf
# cp diagrams/inject/Transformation-and-Recheck-ConnectedSegments-embed.pdf $target/images/inject-Transformation-and-Recheck-ConnectedSegments.pdf
# cp diagrams/inject/Transformation-and-Recheck-RouteSensor-embed.pdf $target/images/inject-Transformation-and-Recheck-RouteSensor.pdf
# cp diagrams/repair/Transformation-and-Recheck-ConnectedSegments-embed.pdf $target/images/repair-Transformation-and-Recheck-ConnectedSegments.pdf
# cp diagrams/repair/Transformation-and-Recheck-RouteSensor-embed.pdf $target/images/repair-Transformation-and-Recheck-RouteSensor.pdf
......@@ -5,14 +5,20 @@ library(ggplot2)
library(ggrepel)
library(arules)
library(ggforce)
library(extrafont)
# loadfonts(device="postscript")
loadfonts(quiet=TRUE)
source('util.R')
# constants
workloads = c(
"PosLength", "SwitchMonitored",
"RouteSensor", "SwitchSet",
"ConnectedSegments", "SemaphoreNeighbor"
# "PosLength", "SwitchMonitored",
"RouteSensor",
# "SwitchSet",
"ConnectedSegments"
# "SemaphoreNeighbor"
)
phases = c("Read", "Check", "Read.and.Check", "Transformation", "Recheck", "Transformation.and.Recheck")
phasesPrettified = c("Read", "Check", "Read and Check", "Transformation", "Recheck", "Transformation and Recheck")
......@@ -114,7 +120,7 @@ for (phase in phasesPrettified) {
yminor_breaks = yaxis$yminor_breaks
ylabels = yaxis$ylabels
for (cpage in 1:6) {
for (cpage in 1:2) {
p = ggplot(df) + #na.omit(df)) +
aes(x = as.factor(Model), y = Time) +
labs(title = paste("Individual query execution time,", phase, "phase"), x = "Model size\n#Elements", y = "Execution times [ms]") +
......@@ -122,50 +128,51 @@ for (phase in phasesPrettified) {
# scale_shape_manual(values = seq(0, 15)) +
scale_shape_manual(values = c(0, 15, 1, 16, 2, 17, 4, 7),
labels=c(
"Name Lookup ", "Name Lookup (Incremental)", # Sky blue - JastAdd NameLookup
"Intrinsic References", "Intrinsic References (Incremental)", # Bluish green - JastAdd Optimized
"Grammar Extension", "Grammar Extension (Incremental)", # Blue - JastAdd Specialized
"TinkerGraph", # Orange - TinkerGraph
"Viatra (Incremental)", # Vermillion - VIATRA
"Name Lookup ", "Name Lookup (Incremental)", # http://www.sthda.com/english/wiki/r-plot-pch-symbols-the-different-point-shapes-available-in-r - JastAdd NameLookup
"Intrinsic References", "Intrinsic References (Incremental)", # Tud-cyan - JastAdd Optimized
"Grammar Extension", "Grammar Extension (Incremental)", # HKS65 (green) - JastAdd Specialized
"TinkerGraph", # HKS92 (grey) - TinkerGraph
"Viatra (Incremental)", # HKS33 (violet) - VIATRA
"(none)"
)) +
scale_colour_manual(values = c(
"#56B4E9", "#56B4E9", # Sky blue - JastAdd NameLookup
"#009E73", "#009E73", # Bluish green - JastAdd Optimized
"#0072B2", "#0072B2", # Blue - JastAdd Specialized
"#E69F00", # Orange - TinkerGraph
"#D55E00", # Vermillion - VIATRA
"#EE7F00", "#EE7F00", # HKS07 (orange) - JastAdd NameLookup
"#009EE0", "#009EE0", # Tud-cyan - JastAdd Optimized
"#6AB023", "#6AB023", # HKS65 (green) - JastAdd Specialized
"#727879", # HKS92 (grey) - TinkerGraph
"#93107E", # HKS33 (violet) - VIATRA
"#F0E442", # Yellow
"#CC79A7"),
labels=c(
"Name Lookup ", "Name Lookup (Incremental)", # Sky blue - JastAdd NameLookup
"Intrinsic References", "Intrinsic References (Incremental)", # Bluish green - JastAdd Optimized
"Grammar Extension", "Grammar Extension (Incremental)", # Blue - JastAdd Specialized
"TinkerGraph", # Orange - TinkerGraph
"Viatra (Incremental)", # Vermillion - VIATRA
"Name Lookup ", "Name Lookup (Incremental)", # HKS07 (orange) - JastAdd NameLookup
"Intrinsic References", "Intrinsic References (Incremental)", # Tud-cyan - JastAdd Optimized
"Grammar Extension", "Grammar Extension (Incremental)", # HKS65 (green) - JastAdd Specialized
"TinkerGraph", # HKS92 (grey) - TinkerGraph
"Viatra (Incremental)", # HKS33 (violet) - VIATRA
"(none)"
)) +
geom_line(aes(col = Tool, group = Tool), size = 0.5) +
scale_x_discrete(breaks = xbreaks, labels = xlabels) +
scale_y_log10(breaks = ybreaks, minor_breaks=yminor_breaks, labels = ylabels) +
scale_y_log10(breaks = ybreaks, minor_breaks=yminor_breaks, labels = ylabels, limits = c(2e-3,8e4), expand = c(0, 0)) +
facet_grid_paginate(~ Workload, nrow=1, ncol = 1, page=cpage, scale = "free") +
guides(color = guide_legend(ncol = 4)) +
theme_bw() +
theme(
plot.title = element_text(hjust = 0.5),
text = element_text(size = 10),
text = element_text(family="Open Sans", size = 10),
# legend.key = element_blank(),
legend.title = element_blank(),
legend.position = "bottom",
axis.text = element_text(size = 9)
axis.text = element_text(size = 16)
#, panel.grid.minor = element_blank()
)
print(p)
ggsave(
plot = p,
filename = paste("../diagrams/recent/", phase.filename, "-",workloads[cpage], ".pdf", sep=""),
width = 280, height = 210, units = "mm"
width = 150, height = 140, units = "mm"
)
embed_fonts(paste("../diagrams/recent/", phase.filename, "-",workloads[cpage], ".pdf", sep=""), outfile=paste("../diagrams/recent/", phase.filename, "-",workloads[cpage], "-embed", ".pdf", sep=""))
}
}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment