Berikut diberikan laporan hasil praktikum dasar Mata Kuliah Statistika Kendali Mutu dalam mempelajari bagaimana mengkonstruksi salah satu peta kendali Shewhart, yaitu X-bar menggunakan data individual.

Data individu yang digunakan pada laporan praktikum ini bersumber dari Cano, E.L., Moguerza, J.M., and Corcoba, M.P., 2015. "Quality control with R: An ISO standard approach’. Springer International Publishing Switzerland.

Langkah 1: Menginstal package “qcc” dengan perintah install.packages(“qcc”) untuk dapat melakukan konstruksi peta kendali di R. Kemudian load the package dan definisikan object datanya dengan perintah sebagai berikut:

library(qcc)
## Package 'qcc' version 2.7
## Type 'citation("qcc")' for citing this R package in publications.
pdensity <- c(10.6817, 10.6040, 10.5709, 10.7858,
              10.7668, 10.8101, 10.6905, 10.6079,
              10.5724, 10.7736, 11.0921, 11.1023,
              11.0934, 10.8530, 10.6774, 10.6712,
              10.6935, 10.5669, 10.8002, 10.7607,
              10.5470, 10.5555, 10.5705, 10.7723)
pdensity
##  [1] 10.6817 10.6040 10.5709 10.7858 10.7668 10.8101 10.6905 10.6079 10.5724
## [10] 10.7736 11.0921 11.1023 11.0934 10.8530 10.6774 10.6712 10.6935 10.5669
## [19] 10.8002 10.7607 10.5470 10.5555 10.5705 10.7723

Langkah 2: Membuat peta kendali X-bar untuk data individual yang bersifat variabel menggunakan perintah berikut;

qcc(data=pdensity,type = "xbar.one")

## List of 11
##  $ call      : language qcc(data = pdensity, type = "xbar.one")
##  $ type      : chr "xbar.one"
##  $ data.name : chr "pdensity"
##  $ data      : num [1:24, 1] 10.7 10.6 10.6 10.8 10.8 ...
##   ..- attr(*, "dimnames")=List of 2
##  $ statistics: Named num [1:24] 10.7 10.6 10.6 10.8 10.8 ...
##   ..- attr(*, "names")= chr [1:24] "1" "2" "3" "4" ...
##  $ sizes     : int [1:24] 1 1 1 1 1 1 1 1 1 1 ...
##  $ center    : num 10.7
##  $ std.dev   : num 0.0943
##  $ nsigmas   : num 3
##  $ limits    : num [1, 1:2] 10.5 11
##   ..- attr(*, "dimnames")=List of 2
##  $ violations:List of 2
##  - attr(*, "class")= chr "qcc"

Demikian laporan singkat dan sederhana ini dibuat sebagai contoh dasar kepada mahasiswa untuk dapat menggunakan “RMarkdown” sebagai alat pembuat laporan hasil praktikum Mata Kuliah Statistik Kendali Mutu. Terima kasih dan semoga bermanfaat.