Universidad del Valle

Escuela de Ingeniería Industrial


1. Primer Punto

Problema: Un proceso de producción de partes trabaja con un porcentaje promedio de defectos de 5%. Cada hora se toma una muestra aleatoria de 18 artículos y se prueban. Si la muestra contiene más de un defecto el proceso deberá detenerse.

Se modela mediante una Distribución Binomial, donde la probabilidad de éxito (defecto) es \(p = 0.05\) y la muestra es \(n = 18\).

Inciso A

Calcule la probabilidad de que el proceso se detenga debido al esquema de muestreo.

\[P(X > 1) = 1 - P(X \le 1) = 1 - [P(X=0) + P(X=1)]\]

Desarrollo: Usamos la función de masa de probabilidad binomial: \(P(X=k) = \binom{n}{k} p^k (1-p)^{n-k}\)

  1. Calculamos la probabilidad de encontrar 0 defectos: \[P(X=0) = \binom{18}{0} (0.05)^0 (0.95)^{18} = 1 \cdot 1 \cdot 0.3972 \approx 0.3972\]
  2. Calculamos la probabilidad de encontrar 1 defecto: \[P(X=1) = \binom{18}{1} (0.05)^1 (0.95)^{17} = 18 \cdot 0.05 \cdot 0.4181 \approx 0.3763\]
  3. Calculamos la probabilidad de detener el proceso (\(X > 1\)): \[P(X > 1) = 1 - (0.3972 + 0.3763) = 1 - 0.7735 = 0.2265\]
n <- 18
p <- 0.05
prob_detener <- 1 - pbinom(1, n, p)
prob_detener
## [1] 0.2264774

Respuesta: Existe un \(22.65\%\) de probabilidad de que se detenga el proceso. Es decir, aproximadamente 23 de cada 100 muestras provocarían una detención.

Inciso B

De acuerdo con lo contestado en a), ¿considera que el esquema de muestreo es adecuado o generará demasiadas interrupciones?

Respuesta: Consideramos que el esquema puede generar demasiadas interrupciones, ya que el porcentaje de defectos del proceso es solamente del 5%, pero la probabilidad de detenerlo es bastante mayor (22.65%). Aunque este método ayuda a controlar la calidad, podría generar paradas innecesarias y aumentar los costos del proceso.

Inciso C

Considere la opción de aumentar a más de 2 el número de defectuosos para detener el proceso y evalúela frente a disminuir la muestra a 17 artículos. Discuta los resultados y sus efectos sobre la calidad.

Desarrollo:

Alternativa 1: \(n=18\), límite > 2 defectos. Calculamos \(P(X=2)\) y lo sumamos a lo obtenido en el inciso A: \[P(X=2) = \binom{18}{2} (0.05)^2 (0.95)^{16} = 153 \cdot 0.0025 \cdot 0.4401 \approx 0.1683\] \[P(X \le 2) = 0.7735 + 0.1683 = 0.9418\] \[P(X > 2) = 1 - 0.9418 = 0.0582\]

Alternativa 2: \(n=17\), límite > 1 defecto. \[P(X=0) = \binom{17}{0} (0.05)^0 (0.95)^{17} \approx 0.4181\] \[P(X=1) = \binom{17}{1} (0.05)^1 (0.95)^{16} = 17 \cdot 0.05 \cdot 0.4401 \approx 0.3741\] \[P(X > 1) = 1 - (0.4181 + 0.3741) = 1 - 0.7922 = 0.2078\]

alt1 <- 1 - pbinom(2, 18, 0.05)
alt2 <- 1 - pbinom(1, 17, 0.05)

data.frame(
  Alternativa = c("1: Límite > 2 (n=18)", "2: Límite > 1 (n=17)"),
  Probabilidad = c(alt1, alt2)
) |> 
  kable(format = "html", align = "c") |> 
  kable_styling(bootstrap_options = c("striped", "hover", "condensed"), full_width = FALSE)
Alternativa Probabilidad
1: Límite > 2 (n=18) 0.0581289
2: Límite > 1 (n=17) 0.2077720

Respuesta: La Alternativa 1 reduce mucho más las interrupciones (de 22.65% a 5.82%), mientras que la Alternativa 2 las reduce muy poco (a 20.78%). Si se desea disminuir las interrupciones, es mucho más efectivo seguir la Alternativa 1. Sin embargo, permitir hasta 2 defectuosos hace que el control de calidad sea menos estricto.

2. Segundo Punto

Problema: El número de componentes que falla antes de cumplir 100 horas de operación es una variable aleatoria distribuida Poisson. Si el número promedio de éstas es 8.

Este ejercicio se modela utilizando la distribución de Poisson, donde \(\lambda\) representa el número de componentes defectuosos en un periodo.

\[X \sim Poisson(\lambda) \quad \Rightarrow \quad P(X = x) = \frac{\lambda^{x} \cdot e^{-\lambda}}{x!}\]

Inciso A

¿Cuál es la probabilidad de que falle un componente en 25 horas?

Desarrollo: 1. Calculamos la tasa ajustada al tiempo mediante regla de tres: \[\lambda = \frac{25 \text{ horas} \cdot 8 \text{ fallas}}{100 \text{ horas}} = 2 \text{ fallas}\] 2. Reemplazamos en la fórmula para \(x = 1\): \[P(X=1) = \frac{2^1 \cdot e^{-2}}{1!} = \frac{2 \cdot 0.1353}{1} \approx 0.2707\]

prob_A <- dpois(1, lambda = 2)
prob_A
## [1] 0.2706706

Respuesta: La probabilidad de que falle exactamente un componente en 25 horas es de 27.07%. De acuerdo con el valor de \(\lambda\), se espera en promedio que fallen 2 unidades, por lo que obtener exactamente una sola falla está por debajo de la media esperada.

Inciso B

¿Cuál es la probabilidad de que fallen no más de 2 componentes en 50 horas?

Desarrollo: 1. Ajustamos la tasa para 50 horas: \[\lambda = \frac{50 \text{ horas} \cdot 8 \text{ fallas}}{100 \text{ horas}} = 4 \text{ fallas}\] 2. Calculamos la probabilidad acumulada \(P(X \le 2) = P(X=0) + P(X=1) + P(X=2)\): \[P(X=0) = \frac{4^0 \cdot e^{-4}}{0!} = e^{-4} \approx 0.0183\] \[P(X=1) = \frac{4^1 \cdot e^{-4}}{1!} = 4 \cdot 0.0183 \approx 0.0733\] \[P(X=2) = \frac{4^2 \cdot e^{-4}}{2!} = \frac{16 \cdot 0.0183}{2} = 8 \cdot 0.0183 \approx 0.1465\] 3. Sumamos las probabilidades: \[P(X \le 2) = 0.0183 + 0.0733 + 0.1465 = 0.2381\]

prob_B <- ppois(2, lambda = 4, lower.tail = TRUE)
prob_B
## [1] 0.2381033

Respuesta: La probabilidad de que fallen como máximo 2 componentes durante 50 horas es aproximadamente de 23.81%. Esto concuerda con el \(\lambda\) de 4 componentes, ya que en promedio se esperan 4 fallas, y que ocurran 2 o menos es un escenario por debajo del promedio.

3. Tercer Punto

Problema: Cierto proceso de llenado debe generar botellas de una bebida refrescante con un contenido nominal de \(350 \pm 5\text{ cc}\). Los datos históricos indican que la cantidad llenada sigue aproximadamente una distribución normal con promedio de \(360\text{ cc}\) y varianza de \(25\text{ cc}\).

Límite inferior (LI) es \(345\text{ cc}\) y límite superior (LS) es \(355\text{ cc}\).

Inciso A

¿Cuál es el porcentaje de botellas con un volumen de llenado no conforme a las especificaciones?

Desarrollo: Tenemos \(\mu = 360\) y \(\sigma = \sqrt{25} = 5\). Estandarizamos usando la fórmula \(Z = \frac{X - \mu}{\sigma}\):

  1. Estandarizamos el Límite Inferior (345): \[Z_1 = \frac{345 - 360}{5} = \frac{-15}{5} = -3.0\] Por tablas de distribución normal estándar, \(P(Z < -3.0) \approx 0.00135\)

  2. Estandarizamos el Límite Superior (355): \[Z_2 = \frac{355 - 360}{5} = \frac{-5}{5} = -1.0\] El área por encima de 355 es \(P(Z > -1.0)\). Por simetría de la campana, esto es equivalente a \(P(Z < 1.0) \approx 0.8413\).

  3. Sumamos las probabilidades no conformes: \[P(\text{No Conforme}) = 0.00135 + 0.8413 = 0.84265\]

mu <- 360
sigma <- 5
LI <- 345
LS <- 355

prob_no_conforme <- pnorm(LI, mu, sigma) + pnorm(LS, mu, sigma, lower.tail = FALSE)
prob_no_conforme
## [1] 0.8426946

Respuesta: El porcentaje de botellas no conformes es aproximadamente 84.27%. El proceso no se encuentra centrado en las especificaciones, ya que el promedio de \(360\text{ cc}\) es superior al límite máximo permitido de \(355\text{ cc}\).

Inciso B

Si un cliente llega a descubrir una botella que contiene un volumen por debajo de las especificaciones, la empresa estaría obligada a entregar un bono por valor de $10.000, ¿en promedio cuánto debería reservar la empresa para asumir los costos de reclamaciones, por cada lote de 10.000 unidades producidas?

Desarrollo: Solo hay reclamaciones si el volumen es menor a \(345\text{ cc}\). 1. Del punto anterior sabemos que \(P(X < 345) \approx 0.00135\). 2. Número esperado de reclamaciones = \(10000 \cdot 0.00135 = 13.5\) botellas. 3. Costo a reservar = \(13.5 \text{ botellas} \cdot \$10.000 = \$135.000\).

p_reclamacion <- pnorm(LI, mu, sigma)
p_reclamacion
## [1] 0.001349898
n_unidades <- 10000
reclamaciones <- n_unidades * p_reclamacion
reclamaciones
## [1] 13.49898
bono <- 10000
costo <- reclamaciones * bono
costo
## [1] 134989.8
data.frame(
  Métrica = c("Probabilidad P(X < 345)", "Reclamaciones Esperadas", "Costo de Reserva ($)"),
  Valor = c(round(p_reclamacion, 5), reclamaciones, costo)
) |> 
  kable(align = "c") |> 
  kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE)
Métrica Valor
Probabilidad P(X < 345) 0.00135
Reclamaciones Esperadas 13.49898
Costo de Reserva ($) 134989.80316

Respuesta: Para un lote de 10,000 unidades producidas, se esperan aproximadamente 13.5 botellas que generen una reclamación. Como cada reclamación representa un bono de $10.000, la empresa debería reservar en promedio $135.000 por cada lote.

4. Cuarto Punto

Problema: La fabricación de un artículo tiene como variable principal el peso. Los resultados de las mediciones arrojaron que el peso de los artículos producidos fue de \(5.71\text{ g}\) como máximo el 92.22% de las veces, y alcanzó \(4.02\text{ g}\) como máximo el 2.5% de las veces. Se asume distribución normal.

Inciso A

Encuentre la media y la desviación estándar con la que se fabricaron los artículos.

Desarrollo: Buscamos en la tabla normal inversa (valores Z) asociados a las probabilidades acumuladas dadas: * Para \(P(Z \le Z_1) = 0.9222\), el valor correspondiente en tablas es \(Z_1 \approx 1.42\). * Para \(P(Z \le Z_2) = 0.0250\), el valor correspondiente en tablas es \(Z_2 \approx -1.96\).

Planteamos el sistema de ecuaciones usando \(X = \mu + Z \cdot \sigma\): 1) \(5.71 = \mu + 1.42\sigma\) 2) \(4.02 = \mu - 1.96\sigma\)

Restamos la ecuación (2) de la ecuación (1): \[5.71 - 4.02 = (\mu - \mu) + (1.42 - (-1.96))\sigma\] \[1.69 = 3.38\sigma \implies \sigma = \frac{1.69}{3.38} = 0.5\text{ g}\]

Reemplazamos \(\sigma\) en la primera ecuación para hallar \(\mu\): \[5.71 = \mu + 1.42(0.5)\] \[5.71 = \mu + 0.71 \implies \mu = 5.71 - 0.71 = 5.0\text{ g}\]

Z1 <- qnorm(0.9222)
Z2 <- qnorm(0.025)

sigma_art <- (5.71 - 4.02) / (Z1 - Z2)
sigma_art
## [1] 0.5000014
mu_art <- 5.71 - (Z1 * sigma_art)
mu_art
## [1] 4.999985
data.frame(
  Parámetro = c("Media (µ)", "Desviación Estándar (σ)"),
  Gramos = c(mu_art, sigma_art)
) |> 
  kable(align = "c") |> 
  kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE)
Parámetro Gramos
Media (µ) 4.9999848
Desviación Estándar (σ) 0.5000014

Respuesta: Al resolver el sistema lineal de dos ecuaciones resultantes de los valores \(Z\), determinamos que el proceso tiene una media real de \(\mu = 5.0\text{ g}\) y una desviación estándar de \(\sigma = 0.5\text{ g}\).

Inciso B

Si se selecciona aleatoriamente un artículo, ¿Cuál es la probabilidad de que tenga un peso superior a 4.5 gramos e inferior a 5.5 gramos?

Desarrollo: Buscamos \(P(4.5 < X < 5.5)\). Estandarizamos ambos límites usando \(\mu=5.0\) y \(\sigma=0.5\): \[Z_{inf} = \frac{4.5 - 5.0}{0.5} = \frac{-0.5}{0.5} = -1.0\] \[Z_{sup} = \frac{5.5 - 5.0}{0.5} = \frac{0.5}{0.5} = 1.0\]

Queremos calcular \(P(-1.0 < Z < 1.0) = P(Z < 1.0) - P(Z < -1.0)\): Por tablas normales sabemos que \(P(Z < 1.0) = 0.8413\) y \(P(Z < -1.0) = 0.1587\). \[P(-1.0 < Z < 1.0) = 0.8413 - 0.1587 = 0.6826\]

prob_entre <- pnorm(5.5, mean = mu_art, sd = sigma_art) - pnorm(4.5, mean = mu_art, sd = sigma_art)
prob_entre
## [1] 0.6826881

Respuesta: Al evaluar el área bajo la curva normal entre los límites de \(4.5\text{ g}\) y \(5.5\text{ g}\), hallamos que la probabilidad es del 68.26%. Esto es consistente con la regla empírica (regla 68-95-99.7), ya que el intervalo solicitado corresponde exactamente a una desviación estándar por encima y por debajo de la media (\(\mu \pm 1\sigma\)).