## Make a single probability plot with a line.
obj <- mlgamma(Nile)
qqmlplot(Nile, obj)
qqmlline(Nile, obj)
## Make multiple probability plots. datax = TRUE must be used to make this
## look good.
ppmlplot(airquality$Wind, mlgamma, main = "Many P-P plots")
ppmlpoints(airquality$Wind, mlexp, col = "red")
ppmlpoints(airquality$Wind, mlweibull, col = "purple")
ppmlpoints(airquality$Wind, mllnorm, col = "blue")
Run the code above in your browser using DataLab