Correções do Cápítulo 8 Epprecht

R/EpprechtTb8.12.R

+#' @name EpprechtTb8.12
+#' @title Controle de qualidade para a fração de não conformes. 
+#' @description Dados das 20 primeiras amostras que representam o número 
+#'     de peças não-conformes em amostras de tamanho 100.
+#' 
+#' @format Um \code{data.frame} com 20 observações e 1 variável, 
+#'     em que
+#' 
+#' \describe{ 
+#' 
+#' \item{\code{nconf}}{Número de peças não conformes nas amostras.}
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 227).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.12) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.12, type="p", size=100,
+#'     xblab="Amostras", ylab="Número de itens não conformes", title=" ")
+#'                   
+NULL
\ No newline at end of file

R/EpprechtTb8.13.R

+#' @name EpprechtTb8.13
+#' @title Controle de qualidade para o número de pedidos de compra com erro
+#' @description Uma grande companhia faz o controle estatístico de
+#'     seus processos administrativos. Para isso, são coletados
+#'     semanalmente o número de pedidos de compra e o número de pedidos 
+#'     de compra não conformes durante a semana.
+#' 
+#' @format Um \code{data.frame} com 15 observações e 2 variáveis, 
+#'     em que
+#' 
+#' \describe{
+#' 
+#' \item{\code{pc}}{Número de pedidos de compra.}
+#' 
+#' \item{\code{pce}}{Número de pedidos de compra com erro.}
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 229).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.13) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.13$pce, type="p", sizes=EpprechtTb8.13$pc,
+#'     xblab=" ", ylab="Observações", title=" ")
+#' 
+#'                   
+NULL
\ No newline at end of file

R/EpprechtTb8.14.R

+#' @name EpprechtTb8.14
+#' @title Controle de Qualidade para o Número de Defeitos em uma Montagem 
+#' de Placa de Circuito
+#' 
+#' @description Para monitorar um processo de montagem de placas de 
+#'     circuitos foram registrados os números de componentes montados 
+#'     erradamente a cada 5 placas (cada amostra consiste em 5 placas). 
+#' 
+#' @format Um \code{data.frame} com 20 observações e 1 variável, 
+#'     em que
+#' 
+#' \describe{
+#' 
+#' \item{\code{nconf}}{Número de não-conformidades encontradas na amostra.}
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 230).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.14) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.14, type="c", size=5,
+#'     xblab="Amostras", ylab="Número de itens não conformes", title=" ")
+#'                   
+NULL
\ No newline at end of file

R/EpprechtTb8.15.R

+#' @name EpprechtTb8.15
+#' 
+#' @title Controle de Qualidade para o Número de Defeitos em um Processo 
+#' de Produção de Tecidos
+#' 
+#' @description Para monitorar um processo de produção de tecidos
+#'     estampados foram examinados os 10 primeiros rolos, com 200 m de 
+#'     tecido cada. Foi registrado o número de defeitos encontrados em 
+#'     cada rolo. 
+#' 
+#' @format Um \code{data.frame} com 10 observações e 1 variável, 
+#'     em que
+#' 
+#' \describe{
+#' 
+#' \item{\code{def}}{Defeitos encontrados em cada rolo.}
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 231).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.15) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.15, type="c", 
+#'     xblab=" ", ylab="Observações", title=" ")
+#'                   
+NULL
\ No newline at end of file

R/EpprechtTb8.16.R

+#' @name EpprechtTb8.16
+#' @title Controle de qualidade na produção de cabos elétricos
+#' @description Dados referentes ao monitoramento do processo de produção
+#'     de cabos elétricos. Foi registrada a quantidade de defeitos
+#'     encontrados em determinada quantidade de metros de cabo.
+#' 
+#' @format Um \code{data.frame} com 10 observações e 2 variáveis, 
+#'     em que
+#' 
+#' \describe{
+#' 
+#' \item{\code{met}}{Quantidade de cabo avaliado em cada amostra (em metros).}
+#' 
+#' \item{\code{def}}{Número de defeitos encontrados.}
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 233).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.16) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.16$def, type="u", sizes=EpprechtTb8.16$met,
+#'     xblab=" ", ylab="Observações", title=" ")  
+#'                    
+NULL
\ No newline at end of file

R/EpprechtTb8.2.R

+#' @name EpprechtTb8.2
+#' @title Número de Clientes Insatisfeitos com a Comida 
+#' @description Dados referentes ao número de clientes insatisfeitos
+#'     com a comida de um restaurante. Esses dados foram obtidos após o
+#'     diagnóstico e a eliminação de causas especiais. 
+#' 
+#' @format Um \code{data.frame} com 30 observações e 1 variável, 
+#'     em que
+#' 
+#' \describe{
+#' 
+#' \item{\code{cinsat}}{Número de clientes insatisfeitos.}
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 204).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.2) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.2, type="p", size=30,
+#'     xblab=" ", ylab="Observações", title=" ")
+#'                   
+NULL
\ No newline at end of file

R/EpprechtTb8.8.R

+#' @name EpprechtTb8.8
+#' @title Controle de qualidade para o número de não-conformidades em geladeiras
+#' @description Dados referentes ao número de não-conformidades  
+#'     em 40 amostras de cinco geladeiras. Foi suposto que o processo
+#'     operava sob controle nesse período. 
+#' 
+#' @format Um \code{data.frame} com 40 observações e 1 variável, 
+#'     em que
+#' 
+#' \describe{
+#' 
+#' \item{\code{nconf}}{Número de itens não conformes.} 
+#' 
+#' }
+#'
+#' @keywords CEQ
+#' 
+#' @source Costa, A. F. B., Epprecht, E. K., Carpinetti, L. (2010).
+#'      Controle Estatístico de Qualidade (2nd ed.). São Paulo - SP:
+#'      Editora Atlas. (pg 222).
+#' 
+#' @examples
+#'
+#' data(EpprechtTb8.8) 
+#' 
+#' library(qcc)
+#' 
+#' qcc(EpprechtTb8.8, type="c", size=5,
+#'     xblab="Amostras", ylab="Número de itens não conformes", title=" ")
+#'                   
+NULL
\ No newline at end of file

data-raw/EpprechtTb8.12.txt

+nconf
+7
+4
+1
+3
+6
+8
+10
+5
+2
+7
+6
+15
+2
+9
+5
+1
+4
+5
+7
+12

data-raw/EpprechtTb8.13.txt

+pc	pce
+105	12
+83	8
+80	6
+100	9
+110	10
+116	12
+108	11
+97	16
+85	10
+92	6
+123	15
+117	9
+79	16
+82	10
+91	5

data-raw/EpprechtTb8.14.txt

+nconf
+1
+2
+0
+3
+1
+1
+5
+1
+0
+3
+0
+2
+0
+2
+1
+1
+2
+3
+0
+2

data-raw/EpprechtTb8.15.txt

+def
+5
+4
+2
+3
+5
+7
+3
+4
+5
+6

data-raw/EpprechtTb8.16.txt

+met	def
+8000	7
+11000	9
+9000	5
+10000	7
+10000	9
+7000	13
+10000	6
+12000	10
+14000	11
+10500	12

data-raw/EpprechtTb8.2.txt

+cinsat
+2
+0
+2
+0
+5
+4
+3
+0
+0
+3
+2
+2
+1
+2
+4
+1
+5
+3
+3
+4
+0
+2
+3
+0
+0
+2
+2
+1
+3
+1

data-raw/EpprechtTb8.8.txt

+nconf
+2
+4
+2
+0
+3
+1
+2
+4
+2
+2
+5
+4
+2
+4
+5
+1
+1
+1
+1
+3
+1
+5
+2
+6
+3
+2
+3
+0
+3
+1
+5
+1
+2
+1
+6
+2
+1
+2
+4
+1