## Not run:
# ## import water quality and weather data
# data(apadbwq)
# data(apaebmet)
#
# ## qaqc, combine
# wq <- qaqc(apadbwq)
# met <- qaqc(apaebmet)
# dat <- comb(wq, met)
#
# ## estimate metabolism
# res <- ecometab(dat)
#
# ## change aggregation period and alpha
# aggremetab(res, by = 'months', alpha = 0.1)
#
# ## use a moving window average of 30 days
# aggremetab(res, by = 30)
#
# ## use a left-centered window instead
# aggremetab(res, by = 30, sides = 1)
# ## End(Not run)
Run the code above in your browser using DataLab