# NOT RUN {
# Determine the shape and rate parameter of a Weibull distribution
# where survival at 6 (e.g.) months is 80%, and survival at 12
# months is 50%.
theta <- WeibullSpec(t1 = 6, p1 = 0.8, t2 = 12, p2 = 0.5)
# }
Run the code above in your browser using DataLab