Implementación de Cartas de Control de Medias (X-barra) para Subgrupos de Tamaño n=2 en R
Las cartas de control son herramientas fundamentales en el control de calidad estadístico, diseñadas para monitorizar procesos y detectar cualquier variación que indique problemas potenciales. Esta guía detallada explica cómo implementar una carta de control de medias (X-bar) para subgrupos de tamaño (n=2) usando R y el paquete `qcc`.
Instalación del Paquete `qcc`
Antes de comenzar, asegúrate de tener instalado el paquete `qcc`. Si aún no lo has hecho, puedes instalarlo fácilmente desde la consola de R con el siguiente comando:
install.packages("qcc")
Una vez instalado, carga el paquete `qcc` para acceder a sus funciones:
library(qcc)
Paso 1: Cargar los Datos
Suponiendo que tienes 30 pares de mediciones guardadas en un archivo llamado `medias.csv`, ubicado en `C:/datos/`, el primer paso es cargar estos datos en R:
datos <- read.csv("C:/datos/medias.csv")
Comentario: Puedes descargar un archivo de pruebas haciendo clic aquí (los decimales estan separados por puntos (.) y los números estan delimitados por comas (,))
Paso 2: Preparación de los Datos
Con los datos cargados, el siguiente paso es convertirlos a una matriz, ya que el paquete `qcc` utiliza matrices para analizar los datos de subgrupos:
datos_matriz <- as.matrix(datos)
Paso 3: Definir Tamaños de Subgrupos
Dado que estamos trabajando con subgrupos de tamaño (n=2), necesitamos asegurarnos de que el vector de `sizes` refleje correctamente esto para cada subgrupo en nuestros datos:
sizes_vector <- rep(2, nrow(datos_matriz))
Paso 4: Generar la Carta de Control
Finalmente, con nuestros datos preparados y el tamaño de los subgrupos definido, podemos proceder a crear la carta de control para las medias:
carta_control <- qcc(datos_matriz,
type = "xbar", # Tipo de carta para medias
sizes = sizes_vector, # Asegurando la correcta cantidad de subgrupos
title = "Carta de Control para n=2")
y R no muestra entonces esta gráfica buscada
También puedes copiar y pegar todo el código anterior desde un único bloque:
# Instalación del paquete qcc (solo es necesario ejecutarlo una vez)
# install.packages("qcc")
# Cargar el paquete qcc
library(qcc)
# Paso 1: Cargar los Datos
# Asegúrate de cambiar la ruta de acceso al archivo según corresponda
datos <- read.csv("C:/datos/medias.csv")
# Paso 2: Preparación de los Datos
# Convertir los datos en una matriz adecuada para qcc
datos_matriz <- as.matrix(datos)
# Paso 3: Definir Tamaños de Subgrupos
# Como cada fila es un subgrupo de tamaño n=2, definimos 'sizes' acordemente
sizes_vector <- rep(2, nrow(datos_matriz))
# Paso 4: Generar la Carta de Control
# Crear la carta de control para medias con subgrupos de tamaño 2
carta_control <- qcc(datos_matriz,
type = "xbar", # Tipo de carta para medias
sizes = sizes_vector, # Asegurando la correcta cantidad de subgrupos
title = "Carta de Control para n=2")
Implementar cartas de control en R con el paquete `qcc` facilita el monitoreo de la calidad y la estabilidad de los procesos. Esta herramienta es invaluable para detectar variaciones significativas y tomar acciones correctivas de manera oportuna.