harlequix/tso-paper-eval
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat(graphs): removed fill from timeseries

Browse Source
This commit is contained in:
Sebastian Rust
2026-06-04 17:38:27 +02:00
parent d6db2cba33
commit adc6617b91
1 changed files with 2 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
figures/fig_timeseries.R
+2 -12
View File
@@ -13,19 +13,9 @@ bins <- read_csv(file.path(args$data, "firstflow_bins.csv"), show_col_types = FA
filter(t_ms >= args$xmin, t_ms <= args$xmax) %>% filter(t_ms >= args$xmin, t_ms <= args$xmax) %>%
prepare_solution() prepare_solution()
pacing_label <- SOLUTION_LABELS[["tso-pacing"]] p <- ggplot(bins, aes(x = t_ms, y = packets, colour = solution, linetype = solution)) +
back <- bins %>% filter(solution == pacing_label) geom_line(linewidth = 0.9, key_glyph = "rect") +
front <- bins %>% filter(solution != pacing_label)
p <- ggplot() +
geom_area(data = back, aes(x = t_ms, y = packets, fill = solution),
alpha = 0.22, show.legend = FALSE) +
geom_line(data = back, aes(x = t_ms, y = packets, colour = solution,
linetype = solution), linewidth = 0.9, key_glyph = "rect") +
geom_line(data = front, aes(x = t_ms, y = packets, colour = solution,
linetype = solution), linewidth = 0.9, key_glyph = "rect") +
scale_colour_manual(values = LABEL_COLORS, breaks = names(LABEL_COLORS)) + scale_colour_manual(values = LABEL_COLORS, breaks = names(LABEL_COLORS)) +
scale_fill_manual(values = LABEL_COLORS, breaks = names(LABEL_COLORS)) +
scale_linetype_manual(values = LABEL_LINETYPES, breaks = names(LABEL_LINETYPES)) + scale_linetype_manual(values = LABEL_LINETYPES, breaks = names(LABEL_LINETYPES)) +
scale_x_continuous(breaks = seq(args$xmin, args$xmax, 1)) + scale_x_continuous(breaks = seq(args$xmin, args$xmax, 1)) +
scale_y_continuous(breaks = seq(0, 45, 5), limits = c(0, 45)) + scale_y_continuous(breaks = seq(0, 45, 5), limits = c(0, 45)) +