Uno de los primeros acercamientos a concepto relacionados a la calidad y sus herramientas, es a través del diagrama de Ishikawa (Ishikawa diagram), conocido también como diagrama Causa-Efecto (Cause and Effect Diagram) o diagrama espina de pescado (Fishbone diagram), esta herramienta de control de calidad y mejora de procesos, fue creada por el administrador de empresas y químico japonés Kaoru Ishikawa (1915-1989) quien se especializo en la creación de sistemas de calidad, proporcionando un análisis científico a las causas que originan los problemas dentro de procesos industriales, el siguiente articulo muestra como hacer uso del paquete Six Sigma (Six Sigma package) en el lenguaje de programación R para la creación de un diagrama Causa-Efecto en cuestión de minutos de manera rápida y sencilla.
Iniciamos con el proceso de instalación y activación del paquete SixSigma (SixSigma package) haciendo uso de las funciones install.packages("SixSigma), para luego continuar con la función library(SixSigma), este primer paso nos permitira tener todo listo para la creación del diagrama Causa-Efecto (Cause&Effect diagram) como lo muestra la siguiente imagen.
El código para la creación del diagrama de Ishikawa usando el paquete SixSigma es sencillo y consta de unas cuentas líneas pero debemos ser tener en consideración ciertos detalles en el despliegue y ejecución del mismo, comenzamos con el comando effect <- "Dispersión de mediciones", que establece el problema que estamos analizando, continuamos con causes.gr <- c("Maquinaria, Mano de obra", "Materiales","Medición","Métodos", "Medio ambiente"), este comando en particular establece las distintas categorias para cada una de las causas, para esta demostración hicimos uso del metodo 6M que permite agrupar las principales causas en 6 categorias o ramas principales, tales como: Maquinaria, Mano de obra, Materiales, Medición, Método y Medio Ambiente; terminamos con el comando causes <- vector(mode="list", length=length(causes.gr)) que crea un vector y establece el conteo de las 6 categorias que almacenaran las causas del problema de estudio,tal como lo muestra la siguiente imagen.
El comando causes() nos permite la creación de vectores donde colocaremos cada una de las causas asociadas a las categorias ya establecidas, para finalmente terminar con la creación del diagrama causa-efecto, mediante el uso del comando ss.ceDiag(effect, causes.gr, causes, sub = "Dispersión de mediciones"), tenemos que indicar que cada uno de los comandos señalados en este artículos deben ser ejecutados en el entorno de desarrollo RStudio, línea por línea, uno por uno, ya que si los ejecutamos como un bloque, como un todo, no podremos crear el gráfico respectivo.
El resultado final es el diagrama Causa-Efecto que mostramos a continuación donde a la cabeza se puede apreciar el problema de estudio, las espinas nos muestran las distintas categorias relacionadas al método 6M y las causas asociadas a éstas.
El siguiente vídeo muestra como crear un diagrama de Ishikawa haciendo uso de los paquete QCC y SixSigma en el lenguaje de programación R.
