updates to export calls

NAMESPACE

@@ -4,6 +4,12 @@ export(CABCMParquetRead)
 export(CleanSites)
 export(CleanWells)
 export(Correlation)
+export(CreateWaterBalancePlot)
+export(GridSeasons)
+export(ModelCorrMap)
+export(ModelScatter)
+export(PlotSeason)
+export(Plot_WWLvsSTR)
 export(SiteData)
 export(model_clean)
 export(process_model_data)
@@ -69,8 +75,12 @@ importFrom(ggspatial,annotation_north_arrow)
 importFrom(ggspatial,annotation_scale)
 importFrom(ggspatial,north_arrow_fancy_orienteering)
 importFrom(glue,glue)
+importFrom(grid,gpar)
 importFrom(grid,grid.draw)
 importFrom(grid,grid.newpage)
+importFrom(grid,grid.text)
+importFrom(grid,textGrob)
+importFrom(gridExtra,arrangeGrob)
 importFrom(gridExtra,grid.arrange)
 importFrom(lubridate,as_date)
 importFrom(lubridate,month)

R/CreateWaterBalancePlot.R

@@ -19,7 +19,7 @@
 #'   \item **Color Mapping**: Uses custom color palettes to differentiate between various variables.
 #'   \item **Plot Combination**: Combines the faceted and total water balance plots into a single grid layout.
 #' }
-#'
+#'@export
 
 
 

R/GridSeasons.R

@@ -33,9 +33,9 @@ GridSeasons <- function(result){
 
   # Dynamically assign a figure caption based on the input data
   figurecaption1 <- dplyr::case_when(
-    "cabcm_v8" %in% source_value ~ "Percent error in non-coastal divides of the Dangermond Preserve. Error is \nfound by solving PPT - AET - RCH - RUN - ∆STR = ERR, averaged to a monthly basis, and recalculated \nas a percentage of PPT. Extreme values in Summer months are attributed to low rainfall.",
+    "cabcm_v8" %in% source_value ~ "Percent error in non-coastal divides of the Dangermond Preserve. Error is \nfound by solving PPT - AET - RCH - RUN - DeltaSTR = ERR, averaged to a monthly basis, and recalculated \nas a percentage of PPT. Extreme values in Summer months are attributed to low rainfall.",
     "terraclim" %in% source_value ~ "Percent error in non-coastal divides of the Dangermond Preserve. Error is
-found by solving PPT - AET - RUN - ∆STR = ERR, averaged to a monthly basis, and recalculated
+found by solving PPT - AET - RUN - DeltaSTR = ERR, averaged to a monthly basis, and recalculated
 as a percentage of PPT.",
     TRUE ~ "NEXTGEN CAPTION PENDING"
   )

R/ModelCorrMap.R

@@ -20,6 +20,9 @@
 #'
 #' @return A combined `ggplot` object with the correlation map and scatter plot side by side.
 #'
+#'
+#'@export
+
 
 
 

R/ModelScatter.R

@@ -16,6 +16,9 @@
 #' }
 #'
 #' @return A `ggplot` object showing the scatter plot comparing well water levels and model storage changes.
+#' 
+#' 
+#' @export
 
 
 

R/PlotSeason.R

@@ -15,6 +15,7 @@
 #'   \item **Visualization**: Plots the spatial data with `percent_error` values visualized using a gradient color scale from white to dark red.
 #'   \item **Title**: Sets the plot title to the provided `season_name`.
 #' }
+#' @export
 
 
 

R/Plot_WWLvsSTR.R

@@ -17,7 +17,7 @@
 #' }
 #'
 #' @return A `ggplot` object showing the bar plot with well water levels and model storage changes.
-#'
+#'@export
 
 
 Plot_WWLvsSTR <- function(x){

R/WaterBalanceSummary_PackageFile.R

@@ -7,8 +7,8 @@
 #' @importFrom ggrepel geom_label_repel
 #' @importFrom ggspatial annotation_scale annotation_north_arrow north_arrow_fancy_orienteering annotation_map_tile
 #' @importFrom glue glue
-#' @importFrom grid grid.draw grid.newpage
-#' @importFrom gridExtra grid.arrange
+#' @importFrom grid grid.draw grid.newpage grid.text gpar textGrob
+#' @importFrom gridExtra grid.arrange arrangeGrob
 #' @importFrom lubridate as_date month
 #' @importFrom purrr map
 #' @importFrom RColorBrewer brewer.pal