From 0e70d218db7d6e05bec628059778a344df200329 Mon Sep 17 00:00:00 2001 From: andybeet <22455149+andybeet@users.noreply.github.com> Date: Tue, 9 Apr 2024 07:48:34 -0400 Subject: [PATCH] added ggpubr to DESCRIPTIONS --- DESCRIPTION | 3 ++- R/make_atlantis_diagnostic_figures.R | 4 ++-- 2 files changed, 4 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 28bfdb3..b2b5546 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -33,7 +33,8 @@ Imports: tidyr, magrittr, reshape2, - gtable + gtable, + ggpubr Remotes: Atlantis-Ecosystem-Model/atlantistools, r4atlantis/atlantisom diff --git a/R/make_atlantis_diagnostic_figures.R b/R/make_atlantis_diagnostic_figures.R index 3b392f1..2d2a637 100644 --- a/R/make_atlantis_diagnostic_figures.R +++ b/R/make_atlantis_diagnostic_figures.R @@ -459,8 +459,8 @@ print("length age") dplyr::mutate(decade = floor(time/10)*10) weight.lim = weight %>% - group_by(species,agecl)%>% - summarise(weight.min = min(meanWeight)/1000, + dplyr::group_by(species,agecl)%>% + dplyr::summarise(weight.min = min(meanWeight)/1000, weight.max = max(meanWeight)/1000) ages = sort(unique(weight.decade$agecl))