# Generate deviates
x <- rgl(1000, med = 1, iqr = 2, chi = 0, xi = .5)
# Fit the data set with the different methods
fitgl(x, inc = FALSE, method = "mle")
fitgl(x, inc = TRUE, method = "mle")
fitgl(x, inc = FALSE, method = "hist", breaks = "FD")
fitgl(x, inc = TRUE, method = "hist", breaks = "FD")
fitgl(x, inc = FALSE, method = "prob")
fitgl(x, inc = TRUE, method = "prob")
fitgl(x, inc = FALSE, method = "quant", len = 1000)
fitgl(x, inc = TRUE, method = "quant", len = 1000)
fitgl(x, method = "shape")
Run the code above in your browser using DataLab