Dyed cloth data

In a textile finishing plant, dyed cloth is inspected for the occurrence of defects per 50 square meters. The data on ten rolls of cloth are presented.

data(dyedcloth)

Format

A data frame with 10 observations on the following 2 variables.

x

number of nonconformities per 50 square meters (inspection units)

size

number of inspection units in roll (variable sample size)

References

Montgomery, D.C. (1991) Introduction to Statistical Quality Control, 2nd ed, New York, John Wiley & Sons, pp. 183--184

Examples

data(dyedcloth)
describe(dyedcloth)
#>      Obs  Mean StdDev Min Median Max
#> x     10 15.30  5.334   7  15.00  23
#> size  10 10.75  1.568   8  10.25  13
dyedcloth <- transform(dyedcloth, sample = seq(nrow(dyedcloth)))
plot(x/size ~ sample, data = dyedcloth, type="b")