x <- rweibull(200, shape = 1.2, scale = 1)
weibplot(x, main = "Classical Weibull plot")
## Weibull lines
weibplot(x, shape = c(0.9, 1.3), scale = 1)
weibplot(x, shape = c(0.9, 1.3), scale = 1,
labels = c("before", "after"))
weibplot(x, shape = c(0.9, 1.3), scale = 1,
labels = c("before", "after"),
mono = TRUE)
Run the code above in your browser using DataLab