fix ggplot legend #182

kharchenkolab · Sep 18, 2024 · a1c71ee · a1c71ee
1 parent d21a5b1
commit a1c71ee
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/vis.R b/R/vis.R
@@ -162,7 +162,8 @@ plot_psbulk = function(
     p = p + geom_point(
             aes(shape = str_detect(state_post, '_2'), alpha = str_detect(state_post, '_2')),
             size = dot_size,
-            na.rm = TRUE
+            na.rm = TRUE,
+            show.legend = TRUE
         ) +
         geom_hline(
             data = data.frame(y = c(0,1), variable = 'pHF'),