Simular errores de signo: cambiando probabilidades
En el ejercicio anterior, cada simulación tenía una probabilidad fija de error de signo en cada paso.
En la pregunta original, la probabilidad de un error de signo puede ser diferente en cada paso; el único requisito es que cada probabilidad sea menor que 0,50.
Aquí, vamos a simular un problema de matemáticas con 2 pasos en el que la probabilidad de un cambio en cada paso es 0,49 y 0,01, lo que significa que hay una alta probabilidad de volverse incorrecto en el primer paso y una baja probabilidad de volver a cambiar.
Este ejercicio forma parte del curso
Acertijos de probabilidad en R
Instrucciones del ejercicio
- Usa la función
sapplycon la funciónrbinompara simular los cambios dentro de un problema, con probabilidades de cambio de 0,49 y 0,01 para el primer y segundo paso, respectivamente. - Determina el número total de cambios que ocurrieron.
- Determina si la respuesta al problema de matemáticas sería correcta o no.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
set.seed(1)
counter <- 0
for(i in 1:10000){
# Simulate switches
each_switch <- sapply(___)
# Count switches
num_switches <-
# Check solution
if(___){
counter <- counter + 1
}
}
print(counter/10000)