Diagrama causa-efecto(diagrama de Isikawa, diagrama espina de pescado).

Ideado por Kaoro Ishikawa. Un diagrama de Causa y Efecto es la representación de varios elementos (causas) de un sistema que pueden contribuir a un problema (efecto) .

Se utiliza para identificar las posibles causas de un problema.

cause.and.effect(cause=list(Manodeobra=c("Entrenamiento","Fatiga", "Concentracion", "Inspeción"),
Maquinaria=c("Desgaste", "Lubricante", "Ajuste","Velocidad"),
Material=c("Tipo de material", "Proveedor", "Espesor", "Limpieza"),
Método=c("Posición", "Temperatura")),
effect="Variación Diámetro")

efecto <- "Variación Diámetro"
causas.gr <- c("Mano de obra", "Maquinaria", "Material", "Método")
causas <- vector(mode = "list", length = length(causas.gr))
causas[1] <-
  list(c("Entrenamiento", "Fatiga","Concentración","Inspección"))
causas[2] <- list(c("Desgaste", "Lubricante","Ajuste","Velocidad"))
causas[3] <-  list(c("Tipo de material","Proveedor","Espesor","Limpieza"))
causas[4] <-list(c("Posición", "Temperatura"))
ss.ceDiag(efecto,causas.gr,causas,sub = "Problema",
  ss.col = c("blue","blue", "blue", "blue"),main="Causa-efecto")

|—|

O.M.F.

paquetes:

qcc

SixSigma