Monthly mean
monthly_mean.Rd
Take the mean of each month, filter if there's not at least 15 days, and create a new date that is the midpoint of each month.
Examples
# site <- "263819081585801"
parameterCd <- "62610"
# statCd <- "00001"
# gw_level_dv <- dataRetrieval::readNWISdv(site, parameterCd,
# statCd = statCd)
# Using package example data:
gw_level_dv <- L2701_example_data$Daily
site_statistics <- monthly_frequency_table(gw_level_dv,
NULL,
parameter_cd = parameterCd)
gw_monthly <- monthly_mean(gw_level_dv)