# NOT RUN {
x <- rweibull(50,2,3)
Est <- MLEst(x)
#Value of the maximum likelihood estimator of the scale parameter
Est$eta
#Value of the maximum likelihood estimator of the shape parameter
Est$beta
# }
Run the code above in your browser using DataLab