# NOT RUN {
data(cania.sub.ts)
# find the annual minimum series and plot
res <- MAMn(cania.sub.ts, n=1)
res2 <- screen.metric(res, "Q (m3/s)")
# do the same with MAM 7-day flow instead of annual minimum
res <- MAMn(cania.sub.ts, n=7)
res2 <- screen.metric(res, "Q (m3/s)")
# }
Run the code above in your browser using DataLab