| ex04.84 {Devore5} | R Documentation |
The ex04.84 data frame has 20 rows and 1 columns of bearing
load lifetimes.
This data frame contains the following columns:
Devore, J. L. (2000) Probability and Statistics for Engineering and the Sciences (5th ed), Duxbury
(1984) "The load-life relationship for M50 bearings with silicon nitrate ceramic balls", Lubrication Engineering, 153159.
data(ex04.84)
attach(ex04.84)
boxplot(loadlife, ylab = "Load-Life (million revs)",
main = "Bearing load-lifes from exercise 4.84",
col = "lightgray")
## Normal probability plot
qqnorm(loadlife, ylab = "Load-life (million revs)")
qqline(loadlife)
## Weibull probability plot
plot(
log(-log(1 - (seq(along = loadlife) - 0.5)/length(loadlife))),
log(sort(loadlife)), xlab = "Theoretical Quantiles",
ylab = "log(load-life) (log(million revs))",
main = "Weibull Q-Q Plot", las = 1)
detach()