diff --git a/R/hy_monthly_flows.R b/R/hy_monthly_flows.R index 9daddd0..612fd46 100644 --- a/R/hy_monthly_flows.R +++ b/R/hy_monthly_flows.R @@ -68,7 +68,7 @@ hy_monthly_flows <- function(station_number = NULL, stns <- station_choice(hydat_con, station_number, prov_terr_state_loc) ## Creating rlang symbols - sym_YEAR <- sym("Year") + sym_YEAR <- sym("YEAR") sym_STATION_NUMBER <- sym("STATION_NUMBER") sym_variable <- sym("variable") sym_temp <- sym("temp") diff --git a/R/hy_monthly_levels.R b/R/hy_monthly_levels.R index bde8b70..1068e4b 100644 --- a/R/hy_monthly_levels.R +++ b/R/hy_monthly_levels.R @@ -67,7 +67,7 @@ hy_monthly_levels <- function(station_number = NULL, stns <- station_choice(hydat_con, station_number, prov_terr_state_loc) ## Creating rlang symbols - sym_YEAR <- sym("Year") + sym_YEAR <- sym("YEAR") sym_STATION_NUMBER <- sym("STATION_NUMBER") sym_variable <- sym("variable") sym_temp <- sym("temp") diff --git a/R/hy_sed_monthly_loads.R b/R/hy_sed_monthly_loads.R index c90528b..de32784 100644 --- a/R/hy_sed_monthly_loads.R +++ b/R/hy_sed_monthly_loads.R @@ -66,7 +66,7 @@ hy_sed_monthly_loads <- function(station_number = NULL, stns <- station_choice(hydat_con, station_number, prov_terr_state_loc) ## Creating rlang symbols - sym_YEAR <- sym("Year") + sym_YEAR <- sym("YEAR") sym_STATION_NUMBER <- sym("STATION_NUMBER") sym_variable <- sym("variable") sym_temp <- sym("temp") diff --git a/R/hy_sed_monthly_suscon.R b/R/hy_sed_monthly_suscon.R index 9683d37..39842b2 100644 --- a/R/hy_sed_monthly_suscon.R +++ b/R/hy_sed_monthly_suscon.R @@ -65,7 +65,7 @@ hy_sed_monthly_suscon <- function(station_number = NULL, stns <- station_choice(hydat_con, station_number, prov_terr_state_loc) ## Creating rlang symbols - sym_YEAR <- sym("Year") + sym_YEAR <- sym("YEAR") sym_STATION_NUMBER <- sym("STATION_NUMBER") sym_variable <- sym("variable") sym_temp <- sym("temp")