fasstr Users Guide"

knitr::opts_chunk$set(eval = nzchar(Sys.getenv("hydat_eval")),
                      # warning = FALSE, 
                      message = FALSE#,
                      #  collapse = TRUE,
                      # crayon.enabled = FALSE
)
#options(crayon.enabled = FALSE)

fasstr, the Flow Analysis Summary Statistics Tool for R, is a set of R functions to tidy, summarize, analyze, trend, and visualize streamflow data. This package summarizes continuous daily mean streamflow data into various daily, monthly, annual, and long-term statistics, completes trending and frequency analyses, with outputs in both table and plot formats.

This vignette documents the usage of the many functions and arguments provided in fasstr. This vignette is a high-level adjunct to the details found in the various function documentations (see help(package = "fasstr") for documentation). You’ll learn how to install the package and a HYDAT database, input data into fasstr functions, add relevant columns and rows to daily data, screen data for outliers and missing dates, calculate and visualize various summary statistics, trend annual flows, and complete volume frequency analyses.

A quick reference PDF cheat sheet is also available for fasstr usage of functions and arguments. It can be downloaded here.

This guide contains the following sections to help understand the usage of the fasstr functions and arguments:

  1. Getting Started
  2. Flow Data Inputs
  3. Function Outputs
  4. Data Tidying (fill_* and add_* functions)
  5. Data Screening (screen_* functions)
  6. Calculating Statistics (calc_* functions)
  7. Analyses (compute_* functions)
  8. Customizing Functions - Data filtering and options
  9. Writing Tables and Plots (write_* functions)

1. Getting Started

Installing and loading fasstr

You can install fasstr directly from CRAN:

install.packages("fasstr")

To install the development version from GitHub, use the remotes package then the fasstr package:

if(!requireNamespace("remotes")) install.packages("remotes")
remotes::install_github("bcgov/fasstr")

Several other packages will be installed with fasstr. These include tidyhydat for downloading Water Survey of Canada hydrometric data, zyp for trending, ggplot2 for creating plots, and tidyr and dplyr for data wrangling and summarizing, amongst others.

To call fasstr functions you can either load the package using the library() function or access a specific function using a double-colon (e.g. fasstr::calc_daily_stats()). fasstr exports the pipe, %>%, so it can be used for tidy workflows.

library(fasstr)

Downloading HYDAT

To use the station_number argument of the fasstr functions, you will need to download a Water Survey of Canada HYDAT database to your computer using the following tidyhydat function. The function will save the database on your computer and know where to find it each time you open R or RStudio. Due to the size of the database, it will take several minutes to download.

tidyhydat::download_hydat()

As HYDAT is updated frequently you may want to periodically update it yourself using the function above. You can check the local version using the following code:

tidyhydat::hy_version()

2. Flow Data Inputs

All functions in fasstr require a daily mean streamflow data set from one or more hydrometric stations. Long-term and continuous data sets are preferred for most analyses, but seasonal and partial data can be used. Note that if partial data sets are used, NA's may be produced for certain statistics. Please see the 'Handling Missing Dates' section in Section 8 for more information. Data is provided to each function using one of the following arguments:

data (and dates, values, and groups)

Using the data option, a data frame of daily data containing columns of dates (YYYY-MM-DD in date format), values (mean daily discharge in cubic metres per second in numeric format), and, optionally, grouping identifiers (character string of station names or numbers) is called. By default, the functions will look for columns identified as 'Date', 'Value', and 'STATION_NUMBER', respectively, to be compatible with the HYDAT default columns. However, columns of different names can be identified using the dates, values, groups column arguments (ex. values = Yield_mm). The values of these arguments are not required to be surrounded by quotes; both "Date" and Date will provide the appropriate column called "Date". An example where groupings other than station numbers could be used include certain time periods of a study for a single station (before, during, and after watershed experiment treatments or before and after the construction of a dam, appropriately identified in a column). The following is an example of an appropriate data frame with default column names (STATION_NUMBER not required):

data <- tidyhydat::hy_daily_flows("08NM116")
data <- data[,c(1,2,4)]
data.frame(data[1:6,])

The following is an example fasstr function arguments if your daily data data frame has the default columns names (no need to list them):

calc_longterm_daily_stats(data = flow_data)

The following is an example if your daily data data frame has non-default columns names of "Stations", "Dates", and "Flows":

calc_longterm_daily_stats(data = flow_data,
                          dates = Dates,
                          values = Flows,
                          groups = Stations)

The data argument is listed first in the list of arguments for each function, so flow data frames can be passed onto fasstr functions using the pipe operator, %>%, without listing the data frame in a tidy workflow.

station_number

Alternatively, you can directly extract flow data directly from a HYDAT database by listing station numbers in the station_number argument while leaving the data arguments blank. Data frames from HYDAT also include 'Parameter' and 'Symbol' columns. The following is an example of listing stations:

calc_longterm_daily_stats(station_number = "08NM116")
calc_longterm_daily_stats(station_number = c("08NM116", "08NM242"))

This package allows for multiple stations (or other groupings) to be analyzed in many of the functions; provided they are identified using the groups column argument (defaults to STATION_NUMBER). If named grouping column doesn't exist or is improperly named then all values listed in the values column will be summarized.


3. Function Types and Outputs

fasstr provides various functions to help in streamflow analyses. They can be generally categorized into the following groups (with more details in the sections below):

Tibble Data Frames

Functions that produce tables create them as tibble data frames. To facilitate the writing of the fasstr tibbles to a directory as .csv, .xls, or .xlsx files with some functionality of rounding digits, the write_results() function can be used (see section 9 for more information).

ggplot2 Plots

Functions that produce plots create them as lists of ggplot2 objects. The use of ggplot2 plots allows for further customization of plots for the user (axis titles, colours, etc.). All plotting functions produce lists to be consistent with table naming conventions of fasstr, allow multiple plots to be created with one function, and to easily allow the saving of multiple plots to a directory. To assist with the saving of lists of plots, a provided function called write_plots() will directly save the list of plots within a directory or single PDF document, with the fasstr plot objects names (see section 9 for more information). Individual plots can be subsetted from their lists using either the dollar sign, \$ (e.g. one_plot <- plots$plotname), or double square brackets, [ ] (e.g. one_plot <- plots[[plotname]] or one_plot <- plots[[1]]).

Some functions produce both tibbles and plots as lists and can be subsequently subsetted as desired.


4. Data Tidying Functions

There are several functions that are used to prepare your flow data set for your own analysis. These functions begin with add_ or fill_ and add columns or rows, respectively, to your flow data frame. These functions include:

The functions are set up to easily incorporate the use of the pipe operator:

fill_missing_dates(station_number = "08HA011") %>% 
  add_date_variables() %>% 
  add_rolling_means(roll_days = 7)
data.frame(head(
  fill_missing_dates(station_number = "08HA011") %>%
    add_date_variables() %>%
    add_rolling_means(roll_days = 7)
))

Filling missing dates

To ensure that analyses do not skip over dates, the fill_missing_dates() function looks for gaps in dates and adds the dates and fills in the flow values with NA. It does not do any gap filling (linear or correlations, for example), it assigns missing flow values with NA. It also fills dates to create complete start and end years. For example, if data starts in April, all flow values starting from January will be filled with NA. The timing of the year depends on the water_year_start argument. When water_year_start is left blank, it will fill to complete calendar years (Jan-Dec). If water_year_start is set to another month (numeric) then it will fill to complete water years of the desired year.

Run and compare the following lines to see how missing dates are filled:

# Very gappy (early years):
tidyhydat::hy_daily_flows(station_number = "08NM116")

# Gap filled with NA's
tidyhydat::hy_daily_flows(station_number = "08NM116") %>% 
  fill_missing_dates()

It is ideal to fill missing dates before using other add_* functions so dates added are not missing the other new date values.

Adding date variables and seasons

The add_date_variables() function adds useful dates columns for summarizing data. The function defaults include 'CalendarYear', 'Month' (numeric), 'MonthName' (month abbreviation; e.g. Jan), 'WaterYear' (year based on selected water_year_start), and 'DayofYear' (the day of year based on selected water_year_start from 1-365). The month of the start of the water year is chosen using the water_year_start argument, which defaults to "1" for January.

Run and compare the following lines to see how the date columns are added:

# Just calendar year info
add_date_variables(station_number = "08NM116")

# If water years are required starting August (use month number)
add_date_variables(station_number = "08NM116", 
                   water_year_start = 8)

The add_seasons() function adds a column of seasons identifiers called "Season". The length of seasons, in months, is provided using the seasons_length argument. As seasons are grouped by months the length of the seasons must be divisible into 12 with season lengths of 1, 2, 3, 4, 6, or 12 months. The start of the first season coincides with the start month of each year; 'Jan-Jun' for 6-month seasons starting with calendar years or 'Dec-Feb' for 3-month seasons starting with water year starting in December. Run and compare the following lines to see how seasons columns are added:

#  2 seasons starting January
add_seasons(station_number = "08NM116",
            seasons_length = 6)

#  4 seasons starting October
add_seasons(station_number = "08NM116", 
            water_year_start = 10,
            seasons_length = 3)

#  4 Seasons starting December
add_seasons(station_number = "08NM116", 
            water_year_start = 12,
            seasons_length = 3)

Adding rolling means

Adding rolling means (running means or averages) of daily data, can be done using the add_rolling_means() functions. Based on the selected "n" rolling days using the roll_days argument, a column for each "n" will be added. One rolling mean column can be added by listing one number (e.g. roll_days = 7) or multiple columns can be added by listing each one (e.g. roll_days = c(3,7,30)). Each column will be named "Q'n'Day" where n is the number (e.g. Q7Day or Q30Day).

Where the alignment of the rolling mean is compared to the date is important to know when analyzing data. The alignment, using the roll_align argument, determine the date at which the rolling means occur.

Odd roll_days example (column headers have alignment direction added):

library(fasstr)
data.frame(head(add_rolling_means(station_number = "08HA011", roll_days = 5, roll_align = "left") %>% 
                  dplyr::rename("Q5Day_left" = Q5Day) %>% 
                  add_rolling_means(roll_days = 5, roll_align = "center") %>% 
                  dplyr::rename("Q5Day_center" = Q5Day) %>% 
                  add_rolling_means(roll_days = 5, roll_align = "right") %>% 
                  dplyr::rename("Q5Day_right" = Q5Day) %>% 
                  dplyr::select(-STATION_NUMBER, -Parameter, -Symbol)))

Even roll_days example:

library(fasstr)
data.frame(head(add_rolling_means(station_number = "08HA011", roll_days = 6, roll_align = "left") %>% 
                  dplyr::rename("Q6Day_left" = Q6Day) %>% 
                  add_rolling_means(roll_days = 6, roll_align = "center") %>% 
                  dplyr::rename("Q6Day_center" = Q6Day) %>% 
                  add_rolling_means(roll_days = 6, roll_align = "right") %>% 
                  dplyr::rename("Q6Day_right" = Q6Day) %>% 
                  dplyr::select(-STATION_NUMBER, -Parameter, -Symbol)))

Adding basin areas

To add a column of basin areas, for viewing or analyzing, the add_basin_area() function can be used. The basin area will be extracted from HYDAT, if available, under two conditions where the basin_area argument can be left blank:

If you would like to apply your own basin area size(s) or override the HYDAT areas, you use the basin_area argument in the following ways:

Run and compare the following lines to see how basin area columns are added:

# Using the station_number argument or data frame as HYDAT groupings
add_basin_area(station_number = "08NM116")

# Using the basin_area argument
add_basin_area(station_number = "08NM116", 
               basin_area = 800)

# Using the basin_area argument with multiple stations
add_basin_area(station_number = c("08NM116","08NM242"), 
               basin_area = c("08NM116" = 800, "08NM242" = 4))

Adding daily volumetric discharge or water yields

Converting daily mean discharge into other units can be useful for different analyses. Columns of total daily discharge converted from daily mean into volumetric flows, named "Volume_m3" in cubic metres per second, or area-based water yields, named "Yield_mm" in millimetres, can be used using the add_daily_volume() and add_daily_yield() functions, respectively. Volumetric gives the total volume per day, and the water yield gives the total water depth, provided an upstream drainage basin area is provided. Basin area can be provided using the basin_area argument, or if there is a groups column of HYDAT station numbers in your data then it will automatically be extracted from HYDAT, if available. (see `adding basin areas above or section 8 for more information).

# Add a column of converted discharge (m3/s) into volume (m3)
add_daily_volume(station_number = "08NM116")    

# Add a column of converted discharge (m3/s) into yield (mm), with HYDAT station groups
add_daily_yield(station_number = "08NM116")   

# Add a column of converted discharge (m3/s) into yield (mm), with setting the basin area
add_daily_yield(station_number = "08NM116", 
                basin_area = 800)   

Adding annual cumulative daily volumetric flows or water yields

These functions create a rolling cumulative of daily total flows on an annual basis, as volumetric flows, named "Cumul_Volume_m3" in cubic metres per second, or area-based water yields, named "Cumul_Yield_mm" in millimetres. A total flow for a given a day is the sum of all previous days and that day, within a given year (Jan 15 cumulative flow value is the sum of all total flows from Jan 1-15). It restarts for each year (based on the starting month) and no values for a year are calculated if there is missing data for a given year as the total for a given year cannot be determined.

# Add a column of cumulative volumes (m3)
add_cumulative_volume(station_number = "08NM116") 

# Add a column of cumulative yield (mm), with HYDAT station number groups
add_cumulative_yield(station_number = "08NM116")   

# Add a column of cumulative yield (mm), with setting the basin area
add_cumulative_yield(station_number = "08NM116", 
                     basin_area = 800)  

Pipelines

By utilizing the data argument as the first one list, it enables the user to work with the tidying functions within a tidy 'pipeline' and can pass onto the other fasstr functions.

fill_missing_dates(station_number = "08NM116") %>% 
  add_date_variables(water_year_start = 9) %>%
  add_seasons(seasons_length = 3) %>% 
  add_rolling_means() %>%
  add_basin_area() %>% 
  add_daily_volume() %>%
  add_daily_yield() %>%
  add_cumulative_volume() %>% 
  add_cumulative_yield()

5. Data Screening Functions

If you are looking at some data for the first time, it may be useful to explore the data quality and availability. The following functions will help to explore the data:

To view the entire daily flow data set to view for gaps and outliers, or changes in flow over time, the plot_flow_data() function will plot all daily data in the data frame. The plot can be filtered by years and dates.

plot_flow_data(station_number = "08NM116") 

When plotting multiple stations, they automatically produce a separate plot for each station. However, setting one_plot = TRUE will plot all stations on the same plot.

plot_flow_data(station_number = c("08NM241", "08NM242"),
               one_plot = TRUE) 

To view a flow time series data quality from their provided HYDAT symbols (qualifer symbols like E for estimate, B for under ice etc.), or custom symbols/categories from a column called "Symbol", the plot_flow_data() function will plot all daily data in the data frame. The plot can be filtered by years and dates.

plot_flow_data_symbols(station_number = "08NM116",
                       start_year = 1972, end_year = 1976) 

The screen_flow_data() function provides an overview of the number of flow values per year and each month per year, along with annual minimums, maximums, means, and standard deviations to inspect for outliers in the data.

screen_flow_data(station_number = "08NM116")
data.frame(head(
  screen_flow_data(station_number = "08NM116")
))

To view the summary data in the screen_flow_data() function, the plot_data_screening() function will plot the annual minimums, maximums, means, medians, and standard deviations, with the point coloured by data availability.

plot_data_screening(station_number = "08NM116") 

Use the plot_missing_dates() function to plot out the missing dates for each month of each year to view for data availability and gaps.

plot_missing_dates(station_number = "08NM116") 

Use the plot_annual_symbols() function to plot the symbols on an annual basis to view the data quality and data availability. The default plots by day of year, but there are options to view annual counts of symbols.

plot_annual_symbols(station_number = "08NM116") 

6. Functions for Calculating Statistics

The majority of the fasstr functions produce statistics over a certain time period, either long-term, annually, monthly, or daily. These statistics are produced using the calc_* functions and can be visualized using their corresponding plot_* functions. The following sections are an overview of these functions.

Basic Summary Statistics

These functions calculate the means, medians, maximums, minimums, and percentiles (choose using the percentiles argument) of a flow data set:

These basic statistics can also be viewed using their corresponding plotting functions:

This function produced flow duration curves:

These other long-term functions summarize the data over the entire record:

Basic long-term statistics

The long-term calc_ and plot_ functions calculate the long-term and long-term monthly mean, median, maximum, minimum, and percentiles of all daily mean flows.

For calc_longterm_daily_stats(), for a given month, all daily flow values for a given month over the entire record are summarized together. For the 'Long-term' category, it summarizes all flow values over the entire record to determine the mean, median, maximum, minimum, and selected percentiles of daily flows. You can also specify a certain period of months to summarize together (ex. Jul-Sep flows) using the custom_months argument (listing the months) and labeling it using the custom_months_label argument (ex. "Summer Flows").

calc_longterm_daily_stats(station_number = "08NM116", 
                          start_year = 1974)
data.frame(calc_longterm_daily_stats(station_number = "08NM116", 
                                     start_year = 1974))

The plot_longterm_daily_stats() will plot the monthly mean, median, maximum, and minimum values along with selected inner and outer percentiles ribbons on one plot. Change the inner and outer percentile ranges using the inner_percentiles and outer_percentiles arguments, remove the maximum and minimum ribbon using include_extremes = FALSE, or add a specific year using add_year.

plot_longterm_daily_stats(station_number = "08NM116", 
                          start_year = 1974,
                          inner_percentiles = c(25,75),
                          outer_percentiles = c(10,90)) 

Similarly, the calc_longterm_monthly_stats() functions will calculate the mean, median, maximum, and percentiles of monthly mean flows from all years. Meaning the all daily flows for each month and each year are averaged, and the statistics are based on these annual monthly means. The "Annual" data row summarizes the mean, median, maximum, and percentiles from all annual means.

calc_longterm_monthly_stats(station_number = "08NM116", 
                            start_year = 1974)
data.frame(calc_longterm_monthly_stats(station_number = "08NM116", 
                                       start_year = 1974))

The corresponding plot_longterm_monthly_stats() function plots the data, with similar options as plot_longterm_daily_stats().

plot_longterm_monthly_stats(station_number = "08NM116", 
                            start_year = 1974) 

Basic annual statistics

The calc_annual_stats() and plot_annual_stats() functions calculate the mean, median, maximum, minimum, and percentiles of daily flows for every year of data provided. In calculating, all daily flow values are grouped by year.

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1974)
data.frame(head(calc_annual_stats(station_number = "08NM116", 
                                  start_year = 1974)))

The percentiles in the plot_annual_stats() function are fully customizable like the calc_ function.

plot_annual_stats(station_number = "08NM116", 
                  start_year = 1974,
                  log_discharge = TRUE) 

Basic monthly statistics

The calc_monthly_stats() and plot_monthly_stats() functions calculate the mean, median, maximum, minimum, and percentiles of daily flows for each month of each year. In calculating, all daily flow values are grouped by year and month.

calc_monthly_stats(station_number = "08NM116", 
                   start_year = 1974)
data.frame(head(calc_monthly_stats(station_number = "08NM116", 
                                   start_year = 1974)))

The percentiles in the plot_monthly_stats() function are fully customizable like the calc_ function. A plot for each different statistic (means, medians, percentiles, etc.) is created to visualize the monthly patterns over the years.

plot_monthly_stats(station_number = "08NM116", 
                   start_year = 1974)[1]

Basic daily statistics

The calc_daily_stats() and plot_daily_stats() functions calculate the mean, median, maximum, minimum, and percentiles of daily flows for each day of the year. For example, for a given day of year (i.e. day 1 (Jan-01) or day 2 (Jan-02)), all flow values for that day from the entire record are summarized together. Only the first 365 days of each year are summarized (ignores the 366th day from leap years). In calculating, all daily flow values are grouped by day of year.

calc_daily_stats(station_number = "08NM116", 
                 start_year = 1974)
data.frame(head(calc_daily_stats(station_number = "08NM116", 
                                 start_year = 1974)))

The plotting daily statistics function will plot the monthly mean, median, maximum, and minimum values along with selected inner and outer percentiles ribbons on one plot. Change the inner and outer percentile ranges using the inner_percentiles and outer_percentiles arguments, remove the maximum and minimum ribbon using include_extremes = FALSE, or add a specific year using add_year.

plot_daily_stats(station_number = "08NM116", 
                 start_year = 1974) 
plot_daily_stats(station_number = "08NM116", 
                 start_year = 1974,
                 add_year = 2000) 

Flow Duration

Flow duration curves can be produced using the function, where selected months and time periods can be selected:

plot_flow_duration(station_number = "08NM116",
                   start_year = 1974) 
plot_flow_duration(station_number = "08NM116",
                   start_year = 1974,
                   months = 7:9,
                   include_longterm = FALSE) 

Other Long-term Statistics

calc_longterm_mean() calculates the mean of all the daily flows, and specific percents of the long-term mean (using percent_MAD argument). It can also be known as the long-term mean annual discharge, MAD.

calc_longterm_mean(station_number = "08NM116", 
                   start_year = 1974,
                   percent_MAD = c(5,10,20))
data.frame(calc_longterm_mean(station_number = "08NM116", 
                              start_year = 1974,
                              percent_MAD = c(5,10,20)))

calc_longterm_percentile() calculates the selected long-term percentiles of all the daily flow values.

calc_longterm_percentile(station_number = "08NM116",
                         start_year = 1974,
                         percentiles = c(25,50,75))
data.frame(calc_longterm_percentile(station_number = "08NM116",
                                    start_year = 1974,
                                    percentiles = c(25,50,75)))

calc_flow_percentile() calculates the percentile rank of a specified flow value, provided as flow_value. It compares the flow value to all daily flow values to determines the percentile rank.

calc_flow_percentile(station_number = "08NM116", 
                     start_year = 1974,
                     flow_value = 6.270)
data.frame(calc_flow_percentile(station_number = "08NM116", 
                                start_year = 1974,
                                flow_value = 6.270))

Basic statistics and plotting volumetric and yield flows

The calc_ and plot_ functions will summarize any values provided to the functions with the default column being 'Value'. While for fasstr this defaults to daily mean flows, any daily value can be summarized (water level, precipitation amount, etc.) if the methods of analyses are similar for the parameter type. As there are no units presented in the calc_ functions this should not be problem for most calculations. However, the plots come standard with a "Discharge (cms)" y-axis, which can be changed afterwards using ggplot2 functions.

To facilitate the plotting of the daily volume or yield statistics from fasstr, after adding them to your flow data using the add_daily_volume() or add_daily_yield() functions, by listing the values argument as either 'Volume_m3' or 'Yield_mm' (from their respective add_* functions), the discharge axis title will adjust accordingly.

add_daily_volume(station_number = "08NM116") %>%
  plot_annual_stats(values = "Volume_m3",
                    start_year = 1974) 
add_daily_yield(station_number = "08NM116") %>%
  plot_daily_stats(values = "Yield_mm",
                   start_year = 1974) 

Cumulative Flow Statistics

Total volumetric of runoff yield flows within a given year can provide important hydrological information on a basin-wide scale. These functions calculate the total volume (in cubic metres) or yield (in millimetres; based on basin size) for a flow data set, at the annual, monthly, or daily cumulative scale.

These statistics can also be viewed using their corresponding plotting functions:

While these functions default to volumetric flows, using use_yield = TRUE and basin_area arguments will calculate totals in runoff yield. If there is a groups column of HYDAT station numbers, then the function will automatically pull the basin area out of HYDAT if available; otherwise a basin area will be required. Due to the requirements of a complete annual data set to calculate total flows, only years of complete data are used.

Cumulative annual statistics

The calc_annual_cumulative_stats() function provides the total annual volume or runoff yield (if use_yield = TRUE is used). It totals all flows for a given year in cubic metres.

calc_annual_cumulative_stats(station_number = "08NM116", start_year = 1974)
data.frame(head(calc_annual_cumulative_stats(station_number = "08NM116", start_year = 1974)))

By using the include_seasons = TRUE (logical TRUE/FALSE) argument, total seasonal flows columns will be added to the results. Two columns of two-seasons (2-six months), and four columns of four-seasons (4-three months) will be added. The start month of the first seasons will begin in the first month of the year (ex. Jan for Calendar years or Oct for water years starting in October).

calc_annual_cumulative_stats(station_number = "08NM116", 
                             start_year = 1974,
                             include_seasons = TRUE)
data.frame(head(calc_annual_cumulative_stats(station_number = "08NM116", 
                                             start_year = 1974,
                                             include_seasons = TRUE)))

The total volumes for each year can be plotted using the plot_annual_cumulative_stats() function. When using include_seasons = TRUE two additional plots will be created, one for two- and four-seasons.

plot_annual_cumulative_stats(station_number = "08NM116", 
                             start_year = 1974) 

Cumulative monthly and statistics

The calc_monthly_cumulative_stats() and plot_monthly_cumulative_stats() functions calculate the mean, median, maximum, minimum, and percentiles of total cumulative monthly flows. For each month of each year, the total volume or runoff yield is determined. Then within a given year, the cumulative total for each month is determined by added all previous months (ex. Jan = Jan total; Feb = Jan+Feb totals, etc.). Then the mean, median, maximum, minimum, and percentiles are calculated based on those monthly cumulative totals for each year. In interpreting the information, if a given total flow is below the mean value, then the cumulative flow is less than average, or less volume has passed through the station than average at that point in time. The percentiles in the calc_ function are flexible using the percentiles argument.

calc_monthly_cumulative_stats(station_number = "08NM116", 
                              start_year = 1974)
data.frame(calc_monthly_cumulative_stats(station_number = "08NM116", 
                                         start_year = 1974))

The plot_monthly_cumulative_stats() function will plot the monthly total mean, median, maximum, and minimum values along with the 5th, 25th, 75th, and 95th percentiles all on one plot. The percentiles are not customizable for this function.

plot_monthly_cumulative_stats(station_number = "08NM116", 
                              start_year = 1974) 

Cumulative daily statistics

The calc_daily_cumulative_stats() and plot_daily_cumulative_stats() functions calculate the mean, median, maximum, minimum, and percentiles of total cumulative daily flows. For each day of each year, the total volume or runoff yield is determined. Then within a given year, the cumulative total for each day is determined by added all previous days (ex. Jan-01 = Jan-01 total; Jan-02 = Jan-01+Jan-02 totals, etc.). Then the mean, median, maximum, minimum, and percentiles are calculated based on those daily cumulative totals for each year. In interpreting the information, if a given total flow is below the mean value, then the cumulative flow is less than average. In other words, less volume has passed through the station than normal at that point in time. Viewing the plot below may help understand how this function works. The percentiles in the calc_ function are flexible using the percentiles argument.

calc_daily_cumulative_stats(station_number = "08NM116", 
                            start_year = 1974)
data.frame(head(calc_daily_cumulative_stats(station_number = "08NM116", 
                                            start_year = 1974)))

The plot_daily_cumulative_stats() function will plot the daily cumulative total mean, median, maximum, and minimum values along with the 5th, 25th, 75th, and 95th percentiles all on one plot. The percentiles are not customizable for this function.

plot_daily_cumulative_stats(station_number = "08NM116", 
                            start_year = 1974,
                            use_yield = TRUE) 

Other Annual Statistics

Beside the basic summary statistics, there are other useful statistics for interpreting annual streamflow data. They include the following::

and their corresponding and other plotting functions:

There are also a few functions that view give some of the annual statistics context:

Annual flow timing

The calc_annual_flow_timing() calculates the day of year when a portion of a total annual volumetric flow has occurred. Using the percent_total argument, one or multiple portions of annual flow can be calculated. Using 50 as the percent_total is similar to the center of volume or timing of half flow. The day of year and date will be also be produced.

calc_annual_flow_timing(station_number = "08NM116", 
                        start_year = 1974)
data.frame(head(calc_annual_flow_timing(station_number = "08NM116", 
                                        start_year = 1974)))

The timing of flows can also be plotted.

plot_annual_flow_timing(station_number = "08NM116",
                        start_year = 1974) 

The timing of flows for a given year can also be plotted.

plot_annual_flow_timing_year(station_number = "08NM116",
                             year_to_plot = 1999) 

Annual low-flows

The calc_annual_lowflows() calculates the annual minimum values, the day of year, and dates of specified rolling mean days (can do multiple days if desired).

calc_annual_lowflows(station_number = "08NM116", 
                     start_year = 1974)
data.frame(head(calc_annual_lowflows(station_number = "08NM116", 
                                     start_year = 1974)))

The annual low flow values and the day of the low flow values can be plotted, separately, using the plot_annual_lowflows() function.

plot_annual_lowflows(station_number = "08NM116",
                     start_year = 1974) 

Annual high flows

The calc_annual_highflows() calculates the annual maximum values, the day of year, and dates of specified rolling mean days (can do multiple days if desired).

calc_annual_highflows(station_number = "08NM116", 
                      start_year = 1974)
data.frame(head(calc_annual_highflows(station_number = "08NM116", 
                                      start_year = 1974)))

The annual high flow values and the day of the high flow values can be plotted, separately, using the plot_annual_highflows() function.

plot_annual_highflows(station_number = "08NM116",
                      start_year = 1974) 

Annual extreme (both high and low) flows

Similar to *_annual_lowflows() and *_annual_highflows(), calc_annual_extremes() calculates the annual maximum and minimum values, the day of year, and dates of specified rolling mean days and specified months for each of the high and low flows.

calc_annual_extremes(station_number = "08NM116",
                     roll_days_min = 7,
                     roll_days_max = 3,
                     start_year = 1974)
data.frame(head(calc_annual_extremes(station_number = "08NM116",
                                     roll_days_min = 7,
                                     roll_days_max = 3,
                                     start_year = 1974)))

The annual extremes values and the days can be plotted:

plot_annual_extremes(station_number = "08NM116",
                     roll_days_min = 7,
                     roll_days_max = 3,
                     start_year = 1974)

The annual extremes values and the days for a given year can also be plotted:

plot_annual_extremes_year(station_number = "08NM116",
                          roll_days_min = 7,
                          roll_days_max = 3,
                          start_year = 1974,
                          year_to_plot = 1999)

Number of normal (and above/below normal) days per year

The calc_annual_normal_days() calculates the number of days per year that are normal and above and below "normal", "normal" typically defined as 25th and 75th percentiles. The normal limits can be determined using the normal_percentiles argument, listing the lower and upper normal ranges, respectively (e.g. normal_percentiles = c(25, 75)). The function calculates the lower and upper percentiles for each day of the year over all years and sums all days that are within and above or below the daily normal ranges for a given year. Rolling averages can also be used in this function using the roll_days argument.

calc_annual_normal_days(station_number = "08NM116", 
                        start_year = 1974)
data.frame(head(calc_annual_normal_days(station_number = "08NM116", 
                                        start_year = 1974)))

Each of the above, below, and normal days can be plotted using the plot_annual_normal_days() function.

plot_annual_normal_days(station_number = "08NM116", 
                        start_year = 1974) 

The daily flows with normal categories for a given year can also be plotted.

plot_annual_normal_days_year(station_number = "08NM116",
                             year_to_plot = 1999) 

Calculating all annual statistics

The calc_all_annual_stats() calculates all statistics that have a single annual value. This includes all the calc_annual_* and the calc_monthly_statistics() functions. Several arguments provided for customization of the statistics. There is no corresponding plotting function for this calculation function.

colnames(calc_all_annual_stats(station_number = "08NM116",
                               start_year = 1974))

Plotting annual means

The plot_annual_means() function provides a way to visualize how annual means fluctuate around the long-term mean. The x-axis is located at the long-term mean annual discharge (mean of all discharge values over all years) and the bars shows the annual means. The plot is essentially an anomaly plot but with their y-value matching the mean value and not difference from the mean.

plot_annual_means(station_number = "08NM116", 
                  start_year = 1974) 

7. Functions for Computing Analyses

There are several functions that provide more in-depth analyses. These functions begin with compute_ instead of calc_ and typically produce more than just a tibble data frame of statistics, like the calc_ functions. Most of these produce a list of objects, consisting of both tibbles and plots. There are three groups of analysis functions: annual trending, annual volume frequency analyses, and a full analysis (of most fasstr functions). There is a separate vignette for each analysis type to provide more information.

Annual Trending Analysis

The compute_annual_trends() function calculates prewhitened non-parametric annual trends on streamflow data using the zyp package. The function calculates various annual metrics using the calc_all_annual_stats() function and then calculates and plots the trending data. The magnitude of trends is first computed using the Theil-Sen approach. Depending on the selected method, either "zhang" or "yuepilon", the trends are adjusted for autocorrelation and then a Mann-Kendall test for trend is applied to the series. The zhang method is recommended for hydrologic applications over yuepilon. See the zyp package and the trending vignette for more information.

The compute_annual_trends() function outputs several objects in a list:

  1. $Annual_Trends_Data - a tibble of annual data from the calc_all_annual_stats() function used for trending
  2. $Annual_Trends_Results - a tibble of annual trending results, from both zyp and fasstr
  3. $Annual_* - a ggplot2 object for every annual statistic trended, with the slope plotted if an alpha value is chosen using the zyp_alpha argument (ex. zyp_alpha = 0.05).

Volume Frequency Analyses

There are five fasstr functions that perform various volume frequency analyses. Frequency analyses are used to determine probabilities of events of certain sizes (typically annual high or low flows). The analyses produce plots of event series and computed quantiles fitted from either Log-Pearson Type III or Weibull probability distributions. See the frequency analysis vignette for more information.

The compute_annual_frequencies() performs an annual daily (or selected duration using roll_days argument) low-flow (by default) or high-flow (using use_max = TRUE argument) frequency analysis on annual series. This analysis uses the daily mean lows or highs. The compute_hydat_peak_frequencies() function performs an annual instantaneous low (by default) or high peak frequency analysis. The data argument cannot be used for the HYDAT peak analysis. Both functions output several objects in a list:

  1. $Freq_Analysis_Data - Tibble of computed annual minimums (or maximums)
  2. $Freq_Plot_Data - Tibble of plotting coordinates used in the frequency plot
  3. $Freq_Plot - ggplot2 object of the frequency plot
  4. $Freq_Fitting - List of fitdistrplus objects of the fitted distributions.
  5. $Freq_Fitted_Quantiles - Tibble with fitted quantiles.

The compute_frequency_quantile() function performs annual daily (or selected duration) low-flow (by default) or high-flow (using use_max = TRUE argument) frequency analysis on annual series but only returns the fitted quantile based on the selected return period. Both the numeric arguments roll_days and return_period are required. It results in a single value. For example, supplying roll_days = 7 and return_period = 10 to the function with a data set will return the 7-day low-flow with a 10-year return period (i.e. 7Q10).

To compute a volume frequency analysis on custom data, use the compute_frequency_analysis() function. The data points to be used in the analysis must be provided in a data frame with a column of events (or years), the flow values (values), and the measure (or the type of value it is, "7-day lows", for example. All other data filtering options are not included.

Full Analysis

If desired, a suite of fasstr functions can be computed using the compute_full_analysis(), producing lists of tables and plots organized in lists by analysis type. write_full_analysis() will create both all the objects and also write data to your computer, in Excel-ready formats and image files. The filetypes of plots and tables can be set using the plot_filetype and table_filetype arguments, respectively. See the full analysis vignette for more information on customizing the analyses and statistics.

The plots and tables are grouped into the following analyses:

  1. Screening
  2. Long-term
  3. Annual
  4. Monthly
  5. Daily
  6. Annual Trends
  7. Low-flow Frequencies

8. Customizing Functions with Arguments - Data Filtering and Options

While tidying and filtering data to desired parameters or time periods can be completed to flow data frames prior to passing them onto fasstr functions, a suite of function arguments have been provided to allow for in-function customization of tidying and filtering. Described here are some of the options available in fasstr functions on how to handle missing dates, filter for specific years or months, and select desired statistics from some of the fasstr functions. Not all functions have all these options see the documentation for each function usage (can also use ?calc_annual_stats to see documentation in R).

Handling Missing Dates

Most functions will automatically (ignore_missing = FALSE) not calculate a statistic for a given period (a year or month or day of year, for example) if there is a date with missing data (NA value) and will result in an NA value or will not plot (base na.rm = FALSE). For example, if there at least one missing day for a given year, an annual statistic will not be calculated for that year. A warning message will appear in the console indicating as such to ensure the user is aware of missing data. See the following code for an example with missing dates:

calc_annual_stats(station_number = "08NM116")

If you want to calculate the statistics regardless of the number of missing dates per time period, use the ignore_missing = TRUE argument.

calc_annual_stats(station_number = "08NM116", 
                  ignore_missing = TRUE)

Starting with fasstr 0.4.0, to allow a certain percentage of missing dates per period and still calculate a statistic, the argument allow_missing (and allow_missing_annual and allow_missing_monthly in come cases) will override the ignore_missing argument in certain functions. A numeric value between 0 and 100 indicating the percentage of missing dates allowed to be included is provided to the argument to calculate a statistic (0 to 100 percent). For example, if 3-4 days of missing dates are permitted per year to calculate annual means, percentiles or extremes, then 1% of days can be applied as allowed_missing = 1.

To maintain usage of ignore_missing, if ignore_missing = FALSE then it defaults to 0 (zero missing dates allowed), and if ignore_missing = TRUE then it defaults to 100 (any missing dates allowed). This argument is included only in functions that calculate annual or monthly means, percentiles, minimums, and maximums including various calc_annual_* and plot_annual_* functions, calc_monthly_stats(), plot_monthly_stats(), and most compute_* functions. See function documentation to see if included. The following example allows the data to have 25%, or ~91 days, of missing dates, to calculate annual statistics:

calc_annual_stats(station_number = "08NM116", 
                  allowed_missing = 25)

Dates Filtering

There are several options in the function that allow you choose year options and to filter for specific time periods. If there is a specific period, years or months, to be analyzed there are several options to customize the data supplied. While filtering of data can be done to your flow data set prior supplying it to a function (using dplyr filtering, for example), these options provide quick solutions for in-function filtering that can be incorporated into a workflow.

Water year and start month

By default, the functions will analyze/group/filter data by calendar years (Jan-Dec). However, some analyses require use of water years, or hydrologic years, starting in other months. If use of water years is desired not starting in January, then set water_year_start with a month other than 1. The water year is identified by the calendar year in which it ends. For example, a water year from Oct 2000 to Sep 2001 would be water year 2001.

Example of a default water year, starting in October:

calc_annual_stats(station_number = "08NM116", 
                  ignore_missing = TRUE,
                  water_year_start = 9)

Example of a water year starting in August:

calc_annual_stats(station_number = "08NM116", 
                  ignore_missing = TRUE,
                  water_year_start = 8)

Selecting and excluding years

To specify select years used in your analysis, the start_year and end_year arguments (providing a single value) can filter the years. Using the exclude_years argument (providing a single or vector of years) will allow you to remove certain years from the analysis. Leaving these arguments blank will include all years in the data set for the analysis.

Example of filtering for start and end years:

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980, 
                  end_year = 2010)

Examples of removing certain years (outliers, bad data, etc.) using exclude_years:

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980, 
                  end_year = 2010,
                  exclude_years = 1982)
calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980, 
                  end_year = 2010,
                  exclude_years = c(1982:1984))

Using only years with complete data

If your data has missing dates, but you would like to use only those years with complete data, some functions utilize the complete_years argument where the data will automatically be filtered for years with complete data and statistics will be calculated. Only years with complete data will be included into the following example.

calc_longterm_daily_stats(station_number = "08NM116", 
                          complete_years = TRUE)

Some functions, like below, require only years with complete data (statistics are based on full years of data), so years with missing dates will be automatically ignored:

calc_annual_flow_timing(station_number = "08NM116")

Selecting for months

Most functions allow you to specify select months used in your analysis, using the months argument. By providing a vector of months (1 through 12) only those months will be used in an analysis. For example, using the months argument with the calc_annual_stats() function will calculate the annual statistics for only those months listed. So, if summer statistics are required you supply months = 6:8 to the function. Leaving this arguments blank will include all months in the data set for the analysis. As of fasstr 0.4.0, the months argument is now included in all calc_, plot_, and compute_ functions to allow for selecting of specific months in all analyses, including calc_all_annual_stats() and compute_annual_trends().

Example of filtering for months June through August:

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980, 
                  end_year = 2010,
                  months = 6:8)

Example of flow timing / center of volume in winter/spring months:

calc_flow_timing(station_number = "08NM116", 
                 start_year = 1980, 
                 end_year = 2010,
                 months = 1:7)

A few functions, including the calc_longterm_daily_stats(), plot_longterm_daily_stats(), and plot_flow_duration() functions will allow you to add a customized time period to your data frame or plot. Using the custom_months argument you can list a vector of months (numeric 1:12). By default, the data will be labelled as "Custom-Months" but can be customized by providing a character string to the custom_months_label argument.

Example of custom months and labeling:

calc_longterm_daily_stats(station_number = "08NM116", 
                          start_year = 1980, 
                          end_year = 2010,
                          custom_months = 6:8,
                          custom_months_label = "Summer")

Rolling averages

Some functions allow you to specify analyzing the data using rolling mean data as opposed to the daily means. For those functions with the roll_days and roll_align arguments, analyses will be computed on the daily mean by default (can leave them blank if so). If choosing to conduct an analysis on 7-day rolling means, you would set roll_days = 7. Some functions allow multiple rolling days to be provided (see function documentation). The roll_align argument determines the direction of the rolling mean: see the "Adding rolling means" portion in Section 4 to see how the roll_days and roll_align work together.

Example of a 7-day rolling mean analysis (single roll_days use):

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980,
                  end_year = 2010,
                  roll_days = 7)

Example of a 7- and 30-day rolling mean analysis (multiple roll_days use):

plot_annual_lowflows(station_number = "08NM116", 
                     start_year = 1980, 
                     end_year = 2010,
                     roll_days = c(7,30))[[1]]

Percentiles and other statistics

Each fasstr function comes with their default statistics to be calculated. While some cannot be changed (some plotting functions), most have the ability to customize what is calculated. Look up the default settings for each function in their documentation (?calc_longterm_daily_stats for example).

By default, the basic summary statistics functions will calculate the mean, median, maximum, and minimum values for each time period; these will automatically be calculated can cannot be removed by an argument option (can remove afterwards if necessary). These functions also calculate default percentiles, which can be customized by changing the desired percentiles by providing a numeric vector of numbers (between 0 and 100) to the percentiles argument.

This example shows the default percentiles for the calc_annual_stats() function (10 and 90th percentiles):

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980, 
                  end_year = 2010)

This example shows custom percentiles for the calc_annual_stats() function (5 and 25th percentiles):

calc_annual_stats(station_number = "08NM116", 
                  start_year = 1980, 
                  end_year = 2010,
                  percentiles = c(5,25))

The following are some examples of how to customize results from other types of functions. See function documentations for full argument uses.

Example of calculating dates of the 10 and 20 percent of total annual flow:

calc_annual_flow_timing(station_number = "08NM116", 
                        start_year = 1980, 
                        end_year = 2010,
                        percent_total = c(10,20))

Example of plotting the number of normal and above/below normal days per year of the 10th and 90th percentiles (25th and 75th percentiles are default):

plot_annual_normal_days(station_number = "08NM116", 
                        start_year = 1980, 
                        end_year = 2010,
                        normal_percentiles = c(10,90))

Data frame options

An option when working with the functions that produce data frames is to transpose the rows and columns of the data. Most functions by default provide data results such there are columns of statistics for each station and time period. See the example here:

calc_longterm_daily_stats(station_number = "08NM116", 
                          start_year = 1980, 
                          end_year = 2010)
data.frame(calc_longterm_daily_stats(station_number = "08NM116", 
                                     start_year = 1980, 
                                     end_year = 2010))

In some circumstances, however, it may be more convenient to wrangle the data such that there are columns for stations (or groupings) and a single column with all statistics, and then the values are placed in columns for each respective time period. See the following example when setting transpose = TRUE.

calc_longterm_daily_stats(station_number = "08NM116", 
                          start_year = 1980, 
                          end_year = 2010,
                          transpose = TRUE)
data.frame(calc_longterm_daily_stats(station_number = "08NM116", 
                                     start_year = 1980, 
                                     end_year = 2010,
                                     transpose = TRUE))

Plotting options

Logarithmic discharge scale

Depending on the plotting function, discharge data will be plotted using a linear or a logarithmic scale (depending on the scale of data). This can be altered using the log_discharge argument. Here is example of plotting with a linear scale (default log_discharge = FALSE):

plot_annual_stats(station_number = "08NM116", 
                  start_year = 1980,
                  end_year = 2010)

Set the discharge scale to be logarithmic (log_discharge = TRUE):

plot_annual_stats(station_number = "08NM116", 
                  start_year = 1980,
                  end_year = 2010,
                  log_discharge = TRUE)
Including a standard title on the plot

The logical include_title argument adds the station number (or grouping identifier from the groupings argument), and in some cases the statistics as well. The argument's default is FALSE.

Example of including a title when plotting (include_title = TRUE):

plot_annual_stats(station_number = "08NM116", 
                  start_year = 1980,
                  end_year = 2010,
                  include_title = TRUE)

Example of including a title when plotting include_title = TRUE where the statistic is also displayed:

plot_monthly_stats(station_number = "08NM116", 
                   start_year = 1980,
                   end_year = 2010,
                   include_title = TRUE)[[1]]

Customizing a plot by using additional ggplot2 functions:

library(ggplot2)

# Create the plot list and extract the plot using [[1]]
plot <- plot_daily_stats(station_number = "08NM116", start_year = 1980)[[1]]

# Customize the plot with various `ggplot2` functions
plot + 
  geom_hline(yintercept = 1.5, colour = "red", linetype = 2, size = 1) +
  geom_vline(xintercept = as.Date("1900-03-01"), colour = "darkgray", linetype = 1, size = 0.5) +
  geom_vline(xintercept = as.Date("1900-08-05"), colour = "darkgray", linetype = 1, size = 0.5) +
  ggtitle("Mission Creek Annual Hydrograph") +
  ylab("Flow (cms)")

9. Writing Tables and Plots

To support saving the fasstr tables and plots to a directory, there are several functions included in this package. These include the following:

Writing a flow data set

To directly save a streamflow data set from HYDAT or your own custom data frame onto your computer, you can use the write_flow_data() function. By listing the station_number or data data frame, the data set will save a file into the working directory, unless otherwise specified using the file_name argument. If using the station_number argument and listing only one station without listing a name with file_name, the name will include the number and followed by "_daily_data.xlsx"; and if multiple stations are listed the name will be "HYDAT_daily_data.xlsx". When using the data argument without listing a name with file_name the default name will be fasstr_daily_data.xlsx. To use another file type than "xlsx" (options are "xlsx", "xls", or "csv") provide a file name using the file_name argument with the desired extension. Other argument options for this function include:

The following will write an "xlsx" file called "08NM116_data_data.xlsx" into your working directory that includes all daily flow data from that station in HYDAT:

write_flow_data(station_number = "08NM116")

The following is an example of possible customization:

write_flow_data(station_number = "08NM116",
                start_year = 1960,
                end_year = 1970
                fill_missing = TRUE,
                file_name = "mission_creek.csv")

Writing a data frame

While you can use the base R write_csv() or writexl package functions to save your data, the package provides a function with options to choose for file type and the rounding of digits. To directly save a data frame onto your computer you can use the write_results() function. This function allows you to decide on file extensions of "xlsx", "xls", or "csv" by including it in the file_name argument when you name the file. This function also allows you to round all numeric columns by selecting the number of digits using the numeric digits argument.

annual_data <- calc_annual_stats(station_number = "08NM116")

write_results(data = annual_data,
              digits = 3,
              file_name = "mission_creek_annual_flows.xlsx")

Writing a list of plots

As all plots produced with this package are contained within lists, a function is provided to assist in saving a list of plots into either a folder, where all plot files are named by the object names within the list, or combined PDF document, using the write_plots() function. The name of the folder or PDF document is provided using the folder_name argument. If the folder does not exist, one will be created. Options to customize output size with width, height, units and dpi arguments, as similar to those in ggplots2:ggsave(), can also be used.

The following will save each annual plot as a "png" file in a folder called "Annual Plots" in the working directory:

annual_plots <- plot_annual_stats(station_number = c("08NM116","08NM242"))

write_plots(plots = annual_data,
            folder_name = "Annual Plots",
            plot_filetype = "png")

The following will save all annual plots as combined "pdf" document called "Annual Plots" in the working directory with each plot on a different page:

annual_plots <- plot_annual_stats(station_number = c("08NM116","08NM242"))

write_plots(plots = annual_data,
            folder_name = "Annual Plots",
            combined_pdf = TRUE)

If you would prefer to save the plots using other functions, like the ggplot2::ggsave() function, the desired plot must subsetted from the list first so the object provided the function is a plot object and not a list. Individual plots can be subsetted from their lists using either the dollar sign, \$ (e.g. one_plot <- plots$plotname), or double square brackets, [ ] (e.g. one_plot <- plots[[plotname]] or one_plot <- plots[[1]]).

Writing a list of data frames and plots

As some objects produced with this package, mainly with the compute_* functions, contain lists of both data frames and ggplot2 objects, a function is provided, called write_objects_list(), to assist in saving all objects within the list into a designated directory folder, where all table and plot files are named by the object names. The name of the folder is provided using the folder_name argument. If the folder does not exist, one will be created. The file type for tables and plots are chosen using the table_filetype and plot_filetype arguments respectively. There are also options to customize plot output size with width, height, units and dpi arguments, as similar to those in ggplots2:ggsave() can also be used.

The following will save all plots and tables in a folder called "Frequency Analysis" in the working directory:

freq_analysis <- compute_annual_frequencies(station_number = "08NM116")

write_objects_list(list = freq_analysis,
                   folder_name = "Frequency Analysis",
                   plot_filetype = "png",
                   table_filetype = "xlsx")


Try the fasstr package in your browser

Any scripts or data that you put into this service are public.

fasstr documentation built on March 31, 2023, 10:25 p.m.