#Get an annual maximum sample and estimate the parameters using Lmoments
AM.27090 <- GetAM(27090)
GEVPars(AM.27090$Flow)
#Estimate parameters using MLE
GEVPars(AM.27090$Flow, mle = TRUE)
#calculate Lmoments and estimate the parmeters with L1, Lcv and Lskew
LMoments(AM.27090$Flow)
#store linear moments in an object
LPars <- as.numeric(LMoments(AM.27090$Flow))[c(1,5,6)]
GEVPars(L1 = LPars[1], LCV = LPars[2], LSKEW = LPars[3])
Run the code above in your browser using DataLab