# Get an AMAX sample and plot
if (FALSE) {
am_27083 <- GetAM(27083)
ERPlot(am_27083$Flow)
}
# Assume pooled estimates of Lcv and LSkew of 0.23, 0.17, and a QMED of 12.
# Use these inputs for the GF argument and change the title
if (FALSE) {
ERPlot(am_27083$Flow, main = "Site 27083 pooled comparison", GF = c(0.23, 0.17, 12))
}
Run the code above in your browser using DataLab