LRmoments(kappaP=c(0,1,0)) #Motivating example
LRmoments(kappaP=c(0,0.25,0.75)) #skew(LR(HP))<0
#Appendix of Slooten and Egeland (2013, submitted)
## Not run: data(db)
# p=db[db$Marker=="VWA",]$Freq
# LRmoments(p=p,kappaP=c(0,1,0))## End(Not run)
Run the code above in your browser using DataLab