try using an intermediate var for z_plot in esle statement

noaa-nwfsc · Apr 23, 2024 · 04556f7 · 04556f7
1 parent f1bb110
commit 04556f7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/zone_summary.R b/R/zone_summary.R
@@ -423,11 +423,11 @@ zone_summary <- function(dat,
 
       break_list <- z_brk_fun(spat_join, breaks, n.breaks, bin_colors, count = count)
 
-      z_plot <- suppressWarnings(z_plot_fun(spat_join, brks = break_list$brks,
+      tmp_z_plot <- suppressWarnings(z_plot_fun(spat_join, brks = break_list$brks,
                                             bin_colors = break_list$colors,
                                             legend_name = legend_name))
 
-      z_plot <- suppressWarnings(plotly::ggplotly(z_plot) %>%
+      z_plot <- suppressWarnings(plotly::ggplotly(tmp_z_plot) %>%
                                  plotly::style(line.width = 1) %>%
                                  plotly::config(scrollZoom = TRUE) %>%
                                  plotly::plotly_build())