U1A8.R

#

#Establecer folder de trabajo
setwd("~/Documents/R-PyE")

#Gráfica de control
#sirve para analizar la variabilidad de un procesos
#y saber si esta "bajo control" o no, para esto utiliza
#LCS = 3 desviaciones por encima de la media
#LCI = 3 desviaciones por debajo de la medida
#Valor medio = la media aritmética
#Valores individuales (i) = xi

#options(pkgType = "binary")
#install.packages("latticeExtra")
#install.packages("qicharts")

#Utilizamos el paquete qicharts
library(qicharts)

## qicharts will no longer be maintained. Please consider moving to qicharts2: https://anhoej.github.io/qicharts2/.

#Dato que estamos utilizando variables aleatorias
#vamos a establecer un valor semilla de 7
#para fines de reproducividad
set.seed(6)

#grafico de control tipo " i " para valores individuales
#crear un vector de variables aleatorias que se distribuyen
#de forma normal

y <- rnorm(48)

#Generar gráfico de control tipo i
qic(y, chart = "i")

#La gráfica de control en este punto se puede interpretar como
#En control ya que no existe ningún valor que supere el limite superior
#ni el limite inferior.


#Desviación estándar
de = sd(y)
de

## [1] 1.071829

#Lo anterior queda justificado por la desviación estándar que está muy cerca
#de la media aritmética por debajo de 1.

#Media aritmética
me = mean(y)
me

## [1] 0.08608562

#Cuando tenemos un valor extremo
y[6] <- 9

#Generar gráfico de control tipo i, con un valor extremo
#Valor fuera de control
qic(y, chart = "i")

#En este punto de gráfico
#Uno de los valores se encuentra fuera de control, supernado el
#límite superior

#Si tuvieramos una desviación estandar mas cercana a la média aritmética
#hablaramos de un proceso mejorado.

#Los gráficos de control
#Pueden ser utilices para controlar la producción o la productividad de los trabajadores entre muchas otras aplicaciones.

#Es una herramienta que define cuantitativamente el rango de variación aceptable con respecto a un valor del promedio y en relación con un límite superior aceptable y un límite inferior aceptable.

#Las gráficas de control nos mostrarán si se encuentran dentro de los valores aceptables.
#Se define un objetivo (la operación normal o promedio)

#Se tienen diferentes patrones que sirven como indicadores de estos gráficos