fixed small bug in SED_MONTHLY_LOADS; addresses but doesn't totally c…

…lose #51
ropensci · Oct 20, 2017 · 82ad8f2 · 82ad8f2
1 parent dea7c3e
commit 82ad8f2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/SED_MONTHLY_LOADS.R b/R/SED_MONTHLY_LOADS.R
@@ -99,7 +99,7 @@ SED_MONTHLY_LOADS <- function(hydat_path=NULL, STATION_NUMBER = NULL, PROV_TERR_
   sed_monthly_loads <- dplyr::collect(sed_monthly_loads)
 
   ## Need to rename columns for gather
-  colnames(sed_monthly_loads) <- c("STATION_NUMBER","YEAR","MONTH", "FULL_MONTH", "NO_DAYS",
+  colnames(sed_monthly_loads) <- c("STATION_NUMBER","YEAR","MONTH", "FULL_MONTH", "NO_DAYS","MEAN_Value",
                            "TOTAL_Value", "MIN_DAY","MIN_Value", "MAX_DAY","MAX_Value")