Taller 3

Autores:

Aguirre Kevin

Hinojosa Betsabe

Llumitaxi Tatiana

Quiroz Jose

Torres Kamile

Curso: CA3-001

Tema: Diagnostico y Unidad 1: Porbabilidades

Fecha: 29-10-2026

Desarrollo:

Actividad 1 Conceptos estadisticos

Una empresa tiene 1 200 facturas registradas durante el trimestre. Para revisar la calidad de sus registros, el auditor selecciona aleatoriamente 80 facturas y registra el monto, el tipo de comprobante y la presencia de errores

  1. Identifique la poblacion, la muestra, la unidad estadistica y el tamaño muestral

La poblacion son las 1 200 facturas registradas en el trimestre ya que es lo mas general que se estan englobando en la actividad.

La muestra son las 80 facturas seleccionadas aleatoriamente.

La unidad estadistica son las facturas

El tamaño muestral son las 80 facturas que se escogen aleatoriamente

Actividad 2. Tabla de frecuencias

Los números de errores encontrados en 20 comprobantes son:

0, 1, 2, 0, 1, 3, 0, 2, 1, 0, 1, 2, 0, 1, 3, 2, 0, 1, 2, 1.

  1. Elabore una tabla con frecuencias absolutas, relativas, porcentuales y acumuladas.
errores <- c(0,1,2,0,1,3,0,2,1,0,1,2,0,1,3,2,0,1,2,1)

frecuencia_absoluta <- table(errores)

tabla <- data.frame(
  Errores = as.integer(names(frecuencia_absoluta)),
  Frecuencia_Absoluta = as.integer(frecuencia_absoluta),
  Frecuencia_Relativa = as.numeric(frecuencia_absoluta) / length(errores)
)
tabla$Frecuencia_Porcentual <- tabla$Frecuencia_Relativa * 100
tabla$Frecuencia_Acumulada <- cumsum(tabla$Frecuencia_Absoluta)

tabla
  Errores Frecuencia_Absoluta Frecuencia_Relativa Frecuencia_Porcentual
1       0                   6                0.30                    30
2       1                   7                0.35                    35
3       2                   5                0.25                    25
4       3                   2                0.10                    10
  Frecuencia_Acumulada
1                    6
2                   13
3                   18
4                   20

Analisis

En la tabla se puede ver de forma ordenada cuanto se repite el nummero de errores como podemos visaulizar tenemos 0 errores repetidos seis veces con un porcetaje de 30% de los 20 comprobantes; además podemos seguir viendo tal cual como lo explicado antes con el 1 que se repite en 7 de los 20 comprobantes es decir un 35% de error por cada 20 comprobantes, que haya 2 errores se repite en 5 comprobantes de los 20 es decir con un porcentaje del 25% y por ultimo que haya 3 errores en comprobantes hubieron 2 de los 20 comprobantes es decir un 10%.

  1. Construya un gráfico de barras.
barplot(tabla$Frecuencia_Absoluta, names.arg = tabla$Errores, col = "green4",
        main = "Numero de errores por comprobante",
        xlab = "Numero de errores", ylab = "Frecuencia absoluta")

Analisis

Aqui se peude visualizar de mejor manera cuanto se repite cada numero de errores por cada comprobante de los 20 que hay.

  1. Determine el porcentaje de comprobantes con al menos dos errores.
5/20
[1] 0.25

El porcentaje de comprobantes que tengan almenos 2 errores es del 0.25 es decir el 25% de los comprobantes tienen 2 errores

  1. Interprete la frecuencia acumulada hasta un error.

la frecuencia acumulada hasta 1 error es 13, es la suma de los comprobantes con 0 errores y los de 1 error, es decir el 65 % de los comprobantes revisados.

Actividad 3. Medidas descriptivas

Los tiempos (minutos) para revisar diez documentos son:

12, 15, 14, 18, 12, 16, 20, 14, 15, 24.

  1. Calcule media, mediana y moda.
tiempos <- c(12, 15, 14, 18, 12, 16, 20, 14, 15, 24)
#Media
#Mediana
summary(tiempos)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   12.0    14.0    15.0    16.0    17.5    24.0 

Analisis

Podemos visualizar que la media del tiempo en minutos para revisar 10 documentos es 16 minutos, además de que la mediana para revisar 10 documentos es 15 minutos que no varia mucho con la media y la moda que es el valor que más se repite tenemos 3 coincidencias que son el 12,14 y 15 que son los que se piten mas veces de los minutos que toma revisar 10 documentos

  1. Calcule rango, varianza muestral y desviación estándar muestral.
#Rango
rango <- max(tiempos)-min(tiempos)
rango
[1] 12
#Variacion muestral
sigma2 <- var(tiempos)
sigma2
[1] 14
#Desviacion estandar
sigma1 <- sd(tiempos)
sigma1
[1] 3.741657

Analisis

Como podemos visualizar al hacer estos calculos con los tiempos en mintuos que toma revisar 10 documentos tenemos que el rango es 12 esto nos quiere decir que es lo que se demora entre el documentos mas largos y mas pequeños, además la variacion muestral nos indica que tanto se alejan los tiempos de la media y la desviacion estandar esta nos dice que los los tiempos de revisión se alejan unos 3,74 minutos de la media de 16

  1. Calcule e interprete el coeficiente de variación.
coefvar <- (sd(tiempos)/mean(tiempos)*100)
coefvar
[1] 23.38536

Analisis

El coeficiente de variación es de 23,39 %, lo que indica que la desviación estándar representa aproximadamente el 23 % del tiempo promedio de revisión “16 min”

  1. Indique qué medida de tendencia central representaría mejor el tiempo habitual y justifique

A nuestro parecer la tendencia central que representaria mejor el tiempo habitual seria la mediana ya que entre los datos de tiempo en minutos tenemos un dato atipico que es el que se aleja mas de la media que es 24, además que el 15 en minutos de la mediana no le afecta este dato atipico.

Actividad 4. Interpretación estadística

En una muestra de 200 declaraciones tributarias, 36 presentan inconsistencias.

  1. Calcule la proporción y el porcentaje de declaraciones inconsistentes.

n = 200 declaraciones y x = 36 con inconsistencias

n <- 200
x <- 36
proporcion <- 36/200
porcentproporcion <- (proporcion)*100
porcentproporcion
[1] 18

Analisis

Las declaraciones inconsistentes de las 200 son el 18%, es decir presentan inconsistencia 18 de cada 100

  1. Explique por qué no puede afirmarse automáticamente que el mismo porcentaje corresponde a todas las declaraciones de la empresa.

El 18 % es un dato estadísticos de la muestra mas no de la poblacion, el calculó con una muestra de 200 declaraciones, no con todas las de la empresa.

  1. Identifique una posible fuente de sesgo si se seleccionan únicamente las declaraciones de un mes.

Si selecciona unicamente las declaraciones de un mes una posible fuente de sesgo vendria siendo que algunos meses tienen más inconsistencias que otros, si se elige solo un mes, se puede sobrestimar o subestimar el porcentaje real de inconsistencias.

Actividad 5. Experimentos y eventos

Se selecciona al azar una factura de un conjunto de 100, clasificadas como correcta, error de cálculo, error de registro o ambos errores.

  1. Defina el experimento aleatorio y el espacio muestral en términos de estas categorías.

S: Espacio muestral

S <- c("Correcta", "Error de calculo", "Error de registro", "Ambos errores")
S
[1] "Correcta"          "Error de calculo"  "Error de registro"
[4] "Ambos errores"    
  1. Defina los eventos 𝐴: «presenta error de cálculo» y 𝐵: «presenta error de registro».
# Eventos
A <- c("Error de calculo", "Ambos errores")     # A: presenta error de calculo
B <- c("Error de registro", "Ambos errores")    # B: presenta error de registro
  1. Exprese con palabras 𝐴 ∪𝐵, 𝐴∩𝐵, 𝐴𝑐 y 𝐴∩𝐵𝑐.

A u B: la factura presenta error de cálculo, error de registro o ambos. Es decir, tiene al menos un error.

𝐴∩𝐵: la factura presenta error de cálculo y error de registro al mismo tiempo, es decir dos errores

𝐴𝑐: la factura no presenta error de cálculo

𝐴∩𝐵𝑐: la factura presenta error de cálculo pero no error de registro

  1. Explique cuándo dos eventos son mutuamente excluyentes.

El momento de que dos eventos son mutuamente excluyentes es cuando no pueden ocurrir al mismo tiempo, es decir cuando no tienen resultados en común A ∩ B = ∅ y P(A ∩ B) = 0.

Actividad 6. Reglas de probabilidad*

En una revisión de 300 comprobantes, 105 presentan errores de respaldo (𝐴), 75 presentan errores contables (𝐵) y 30 presentan ambos tipos de error.

Eventos:

A: Presentan errores de respaldo

B: presentan errores contables

C: Presentan ambos errores

  1. Calcule 𝑃(𝐴), 𝑃(𝐵) y 𝑃(𝐴∩𝐵).
PA <- 105/300
PB <- 75/300
PAnB <- 30/300
PA
[1] 0.35
PB
[1] 0.25
PAnB
[1] 0.1

Analisis

Como podemos observar tras realizar acada uno de los calculos tenemos que la probabilida de que presente errores de respaldo es de 35% de los 300 comprobantes tambien de los mismos 300 comprobantes tenemos que el 25% presentan errores contables y que el 10% presenta ambos errores.

  1. Calcule la probabilidad de que un comprobante tenga al menos uno de los dos errores.
PAuB <- PA+PB-PAnB
PAuB
[1] 0.5

Analisis

La probabilidad de que un comprobante tenga al menos uno de los dos errores es de 0.5 o tambien se puede decir el 50% de los 300 comprobantes que seria ya la mitad de estos

  1. Calcule la probabilidad de que no tenga ninguno de estos errores.
PAc <- 195/300
PBc <- 225/300
PAnBc <- 270/300
PAuBc <- PAc+PBc-PAnBc
PAuBc
[1] 0.5

Interpretacion

La probabilidad de que no tenga ninguno de estos errores es del 50% es decir la mitad de los comprobantes no van a tener ninguno de estos errores

  1. Calcule la probabilidad de que tenga únicamente error de respaldo.
PA1 <- PA-PAnB
PA1
[1] 0.25

Interpretacion

La probabilidad de que tenga únicamente error de respaldo es del 25% de los 300 comprobantes

  1. Determine si 𝐴 y 𝐵 son independientes y justifique
PA*PB
[1] 0.0875
PAnB
[1] 0.1

Justificacion

Si PA*PB=PAnB serian independientes pero al ser diferentes ya que 0.0875 No es igual a 0.1 estos nons dice que si son dependientes

Actividad 7. Tabla de contingencia

Una firma auditora revisó 240 expedientes:

Area Con Observaciones Sin Observaciones Total
Compras 35 85 120
Ventas 25 95 120
Total 60 180 240

Se selecciona un expediente al azar.

Eventos

PA1: Compras

PA2: Ventas

PB1: Con observaciones

PB2: Sin observaciones

  1. Calcule la probabilidad de que pertenezca a Compras.
PA1 <- 120/240
PA1
[1] 0.5

Interpretacion

La probabilidad de que pertenezca a Compras es del 50% de los 240 expedientes revisados por la firma de auditoria.

  1. Calcule la probabilidad de que tenga observaciones
PB1 <- 60/240
PB1
[1] 0.25

Interpretacion

La probabilidad de que tenga observaciones los expedientes revisados por la firma de auditoria es de 25%

  1. Calcule la probabilidad de que sea de Compras y tenga observaciones
PA1yB1 <- 35/240
PA1yB1
[1] 0.1458333

Interpretacion

La probabilidad de que sea de Compras y tenga observaciones es del 14,58% del total de expedientes revisados por la firma de auditoria

  1. Calcule 𝑃(observaciones ∣ Compras).
PB1tantoA1 <- 35/120
PB1tantoA1
[1] 0.2916667

Interpretacion

La probabilidad de que P(observaciones ∣ Compras) es del 29.17% es decir que solo este porcentaje de compras tiene observaciones

  1. Calcule 𝑃(Compras ∣ observaciones).
PA1tantoB1 <- 35/60
PA1tantoB1
[1] 0.5833333

Interpretacion

La probabilidad de que Dentro de los expedientes con observaciones pertenezca a Compras es de 58.33%

  1. Compare los resultados de los numerales 4 y 5 e interprete por qué son distintos.

Son distintos porque cambia el grupo de referencia en el numeral 4 se parte de los 120 expedientes de Compras y en el numeral 5 de los 60 expedientes con observaciones, el numerador es el mismo, pero se divide entre totales diferentes

Actividad 8. Árbol de probabilidades

El 60 % de los documentos auditados corresponde a proveedores nacionales y el 40 % a proveedores internacionales. El 8 % de los documentos nacionales y el 15 % de los internacionales presenta errores.

Eventos:

PA1: Proveedores Nacionales 0.6

PA2: Proveedores Internacionales 0.4

PB1: Nacional con errores 0.08

PB2: internacional con errores 0.15

  1. Dibuje un árbol de probabilidades con sus ramas y probabilidades condicionales.

  2. Calcule la probabilidad de seleccionar un documento nacional con errores.

PA1 <- 0.6
PB1 <- 0.08
PA1B1 <- PA1*PB1
PA1B1
[1] 0.048

Interpretacion

La probabilidad de seleccionar un documento nacional con errores es del 4,8%

  1. Calcule la probabilidad total de seleccionar un documento con errores.
PB2 <- 0.15
PA2 <- 0.4
Pt <- PA2*PB2
perror <- PA1B1+Pt
perror
[1] 0.108

Interpretacion

La probabilidad total de seleccionar un documento con errores es del 10.8%

  1. Calcule la probabilidad de seleccionar un documento sin errores.
Psn <- PA1*0.92
Pse <- PA2*0.85
Ptt <- Psn+Pse
Ptt
[1] 0.892

Interpretacion

La probabilidad de seleccionar un documento sin errores es del 89,20%

Actividad 9. Teorema de Bayes

Utilice la información de la actividad 8.

  1. Si se selecciona un documento que presenta errores, calcule la probabilidad de que pertenezca a un proveedor internacional.
PA2 <- 0.40
PB2 <- 0.15
piex <- PA2*PB2/perror
piex
[1] 0.5555556

Interpretacion

La probabilidad de que pertenezca a un proveedor internacional es del 55,55%

  1. Escriba la fórmula del teorema de Bayes e identifique las probabilidades previas y posteriores.

\[P(A_i|B)=\frac{P(B|A_i)P(A_i)}{P(A_1)P(B|A_1)+P(A_2)P(B|A_2)+...+P(A_n)P(B|A_n)}\]

PA1 <- 0.6
PA2 <- 0.4
PBdadoA1 <- 0.08
PBdadoA2 <- 0.15
PB1 <- PA1*PBdadoA1+PA2*PBdadoA2
#se multiplica respectivamente
PA2dadoB1 <- round((PBdadoA2*PA2/PB1)*100,2)
PA2dadoB1
[1] 55.56
PA1dadoB <- PA1*PBdadoA1/perror
PA2dadoB <- PA2*PBdadoA2/perror
bayes <- data.frame(
  Proveedor = c("Nacional", "Internacional"),
  Previa = c(PA1, PA2),
  Verosimilitud = c(PBdadoA1, PBdadoA2),
  Conjunta = c(PA1 * PBdadoA1,
               PA2 * PBdadoA2),
  Posterior = c(PA1dadoB, PA2dadoB)
)
bayes
      Proveedor Previa Verosimilitud Conjunta Posterior
1      Nacional    0.6          0.08    0.048 0.4444444
2 Internacional    0.4          0.15    0.060 0.5555556
  1. Interprete el resultado desde la perspectiva de la planificación de una auditoría.

Los documentos internacionales son el 40 % del total, pero al saber que un documento tiene error, la probabilidad de que sea internacional sube a 55,56 %, es decir, aportan más de la mitad de los errores aun siendo la minoría de los documentos, esto se debe a que su tasa de error casi duplica la de los nacionales.

Para planificar la auditoría, conviene asignar más tiempo, pruebas y muestra a los proveedores internacionales, porque son los de mayor riesgo, los nacionales no se descartan siguen aportando el 44,44 % de los errores, por su mayor volumen.

Actividad 10. Técnicas de conteo

Un departamento de auditoría cuenta con 8 profesionales y debe seleccionar un equipo de 3 personas.

  1. ¿De cuántas formas puede seleccionarse el equipo si todos pueden participar?

n: 8

m: 3

n <- 8
r <- 3
choose(n,r)
[1] 56

Existen 56 equipos distintos de 3 personas que se pueden formar con los 8 profesionales

  1. ¿De cuántas formas pueden asignarse los cargos de coordinador, revisor y secretario entre los 8 profesionales, sin repetir personas?
factorial(n) / factorial(n - r) 
[1] 336

Hay 336 maneras de asignar los cargos de coordinador, revisor y secretario entre los 8 profesionales sin repetir personas.

  1. Explique por qué en un caso se utilizan combinaciones y en el otro permutaciones.
choose(n, r) * factorial(r) 
[1] 336

La diferencia está en si el orden importa. Hay 336 permutaciones frente a 56 combinaciones porque cada equipo de 3 personas se puede ordenar de 3! = 6 formas al asignarle los cargos (56 × 6 = 336). Es decir, asignar cargos produce 6 veces más resultados que solo formar el equipo.

  1. Si se deben revisar 5 informes diferentes en un orden determinado, ¿cuántos órdenes posibles existen?
factorial(5)
[1] 120

Hay 120 órdenes posibles para revisar los 5 informes. Si el auditor puede elegir cualquier secuencia, tiene 120 planes de revisión distintos.

Actividad 11. Caso integrador

Una empresa registró 500 transacciones. De ellas, 220 fueron compras y 280 ventas. Se detectaron 44 compras con errores y 28 ventas con errores.

  1. Organice la información en una tabla de contingencia completa.

    TIPO Con error Sin error Total
    Compra 44 176 220
    Venta 28 252 280
    TOTAL 72 428 500
  2. Calcule la probabilidad de seleccionar una transacción con errores.

72/500
[1] 0.144

El 14,4 % de las transacciones tiene errores.

  1. Calcule la probabilidad de seleccionar una compra sin errores.
176/500
[1] 0.352

El 35,2 % de todas las transacciones son compras sin errores.

  1. Calcule la probabilidad de error condicionada a que la transacción sea una compra.
44/220
[1] 0.2

El 20 % de las compras presenta errores

  1. Si una transacción seleccionada tiene errores, calcule la probabilidad de que sea una compra.
44/72
[1] 0.6111111

El 61,11 % de las transacciones con errores son compras.

  1. Construya un árbol de probabilidades equivalente a la tabla.

  2. Redacte una conclusión sobre cuál tipo de transacción requiere mayor atención en la auditoría, diferenciando frecuencia absoluta y riesgo condicional

Las compras acumulan más errores, el 61,11 % del total de errores,en riesgo condicional, una compra tiene el doble de probabilidad de error que una venta, como las compras son menos numerosas pero más riesgosas, requieren mayor atención en la auditoría, hay que distinguir cuántos errores hay de qué tan probable es que una transacción tenga error

Bibliografia

Lind, Marchal y Wathen. Estadística aplicada a los negocios y la economía, 15.ª edición.

Anderson, Sweeney y Williams. Estadística para administración y economía, 10.ª edición.

Webster, Allen L. Estadística aplicada a los negocios y la economía.

Universidad Central del Ecuador. Sílabo de Estadística Inferencial, Unidad 1: Probabilidad y Distribuciones