Add error bar color controls

qhtcp-workflow/apps/r/calculate_interaction_zscores.R

@@ -757,7 +757,7 @@ generate_interaction_plot_configs <- function(df, type) {
       coord_cartesian = y_limits,
       error_bar = TRUE,
       error_bar_params = list(
-        color = "red",
+        color = "red"
       ),
       x_breaks = unique(df$conc_num_factor_factor),
       x_labels = as.character(unique(df$conc_num)),