# NOT RUN {
#Get an AMAX sample and plot
# }
# NOT RUN {
AM.27083 <- GetAM(27083)
# }
# NOT RUN {
ERPlot(AM.27083$Flow)
# }
# NOT RUN {
#Get some pooled estimate of Lcv & LSkew to use with the GF argument
# }
# NOT RUN {
QuickResults(GetCDs(27083), gauged = TRUE)
# }
# NOT RUN {
#Use the resulting Lcv, Lskew and RP2 for the GF argument and change the title
# }
# NOT RUN {
ERPlot(AM.27083$Flow, Title = "Site 27083 pooled comparison", GF = c(0.2286109, 0.1536903, 12.513))
# }
Run the code above in your browser using DataLab