Humidity of 20 groups of size 5 of raw materials to make particle boards. For the mean and range control chart.
Usage
data(ss.data.pb2)
Format
A data frame with 100 observations on the following 2 variables.
pb.group
a numeric vector
pb.humidity
a numeric vector
Note
This data set is used in chapter 12 of the book “Six Sigma with R” (see
References).
Source
See references.
References
Cano, Emilio L., Moguerza, Javier M. and Redchuk, Andr<c3><83><c2><a9>s. 2012.
Six Sigma with R. Statistical Engineering for Process
Improvement, Use R!, vol. 36. Springer, New York.
http://www.springer.com/statistics/book/978-1-4614-3651-5.
Examples
data(ss.data.pb2)
summary(ss.data.pb2)
if (require(qcc)){
pb.groups.xbar <- with(ss.data.pb2, qcc.groups(pb.humidity, pb.group))
pb.xbar <- qcc(pb.groups.xbar, type="xbar")
summary(pb.xbar)
} else {
message("qcc package is needed to run this example")
}
Results
R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
> library(SixSigma)
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/SixSigma/ss.data.pb2.Rd_%03d_medium.png", width=480, height=480)
> ### Name: ss.data.pb2
> ### Title: Particle Boards Example - by Groups
> ### Aliases: ss.data.pb2
> ### Keywords: cc data
>
> ### ** Examples
>
> data(ss.data.pb2)
> summary(ss.data.pb2)
pb.group pb.humidity
Min. : 1.00 Min. : 9.93
1st Qu.: 5.75 1st Qu.:11.36
Median :10.50 Median :11.95
Mean :10.50 Mean :12.07
3rd Qu.:15.25 3rd Qu.:12.69
Max. :20.00 Max. :14.37
> if (require(qcc)){
+ pb.groups.xbar <- with(ss.data.pb2, qcc.groups(pb.humidity, pb.group))
+ pb.xbar <- qcc(pb.groups.xbar, type="xbar")
+ summary(pb.xbar)
+ } else {
+ message("qcc package is needed to run this example")
+ }
Loading required package: qcc
Package 'qcc', version 2.6
Type 'citation("qcc")' for citing this R package in publications.
Call:
qcc(data = pb.groups.xbar, type = "xbar")
xbar chart for pb.groups.xbar
Summary of group statistics:
Min. 1st Qu. Median Mean 3rd Qu. Max.
11.05 11.72 12.05 12.07 12.50 13.38
Group sample size: 5
Number of groups: 20
Center of group statistics: 12.07026
Standard deviation: 0.8878313
Control limits:
LCL UCL
10.87911 13.26141
>
>
>
>
>
>
> dev.off()
null device
1
>