## 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)
#
# ## plot
# plot_metab(res)
#
# ## change alpha, aggregation period, widths
# plot_metab(res, by = 'quarters', alpha = 0.1, widths = 0)
#
# ## plot daily raw, no aesthetics
# plot_metab(res, by = 'days', pretty = FALSE)
#
# ## note the difference if aggregating with a moving window average
# plot_metab(res, by = 30)
# ## End(Not run)
Run the code above in your browser using DataLab