From 4f0c36fd6675e7f2abd4db7e0f38ef511dd2d18d Mon Sep 17 00:00:00 2001 From: Bryan Roessler Date: Sun, 15 Sep 2024 12:01:07 -0400 Subject: [PATCH] Prevent interactive variable collision in generate_plot --- qhtcp-workflow/apps/r/calculate_interaction_zscores.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/qhtcp-workflow/apps/r/calculate_interaction_zscores.R b/qhtcp-workflow/apps/r/calculate_interaction_zscores.R index 9f2aa982..ce553b13 100644 --- a/qhtcp-workflow/apps/r/calculate_interaction_zscores.R +++ b/qhtcp-workflow/apps/r/calculate_interaction_zscores.R @@ -425,10 +425,10 @@ generate_and_save_plots <- function(output_dir, file_name, plot_configs, grid_la } # Generate the static plot - static_plot <- generate_plot(is_interactive = FALSE) + static_plot <- generate_plot(interactive = FALSE) # Generate the interactive plot - interactive_plot <- generate_plot(is_interactive = TRUE) + interactive_plot <- generate_plot(interactive = TRUE) # Convert to plotly object plotly_plot <- ggplotly(interactive_plot, tooltip = "text")