change top tile label in plot_defol() to "GSI"

chguiterman · Mar 2, 2020 · 47a9981 · 47a9981
1 parent 779feb0
commit 47a9981
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/plotting.R b/R/plotting.R
@@ -97,7 +97,7 @@ plot_outbreak <- function(x, disp_index = "mean_ngsi") {
                               y = y_intercept,
                               yend = .data[[disp_index]]),
                           size = 2) +
-    scale_y_continuous(name = "Growth suppression index") +
+    scale_y_continuous(name = "GSI") +
     ggpubr::theme_pubr() +
     theme(plot.margin = unit(c(0.1, 0, 0, 0), "cm"),
                    axis.title.x = element_blank(),