reduce overplotting in resids

nicholasjclark · Nov 25, 2024 · b1fd152 · b1fd152
1 parent e45e01d
commit b1fd152
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/plot_mvgam_resids.R b/R/plot_mvgam_resids.R
@@ -130,6 +130,7 @@ plot_mvgam_resids = function(object,
                   ymidhigh = quantile(acf, probs = 0.75),
                   yqhigh = quantile(acf, probs = 0.8),
                   yhigh = quantile(acf, probs = 0.95)) %>%
+    dplyr::select(-acf) %>%
     dplyr::distinct()
   acf_plot <- ggplot2::ggplot(acf_stats,
                               ggplot2::aes(x = lag)) +
@@ -172,6 +173,7 @@ plot_mvgam_resids = function(object,
                   ymidhigh = quantile(pacf, probs = 0.75),
                   yqhigh = quantile(pacf, probs = 0.8),
                   yhigh = quantile(pacf, probs = 0.95)) %>%
+    dplyr::select(-pacf) %>%
     dplyr::distinct()
 
   pacf_plot <- ggplot2::ggplot(pacf_stats,