various scripts for working with Weibull distributions in R