Simula la probabilidad para un conjunto dado de cinco años
Ahora, usemos la función check_for_five de la pregunta anterior para simular 10000 iteraciones de cinco años y hacernos una idea de lo poco común que fue la hazaña de Ronnie Bardah de cinco cobros consecutivos. De nuevo, supondremos un total de 6000 jugadores, de los cuales el 10 %, es decir, 600, cobrarán cada año.
Este ejercicio forma parte del curso
Acertijos de probabilidad en R
Instrucciones del ejercicio
- Crea una matriz con los resultados de quién cobró en cada uno de los cinco años, teniendo en cuenta que se asume un total de 6000 jugadores y que 600 de ellos cobrarán.
- Completa la condición para comprobar si algún jugador cobró en los cinco años.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
players <- c(1:6000)
count <- 0
for(i in 1:10000){
# Create matrix of cashing players
cashes <- ___
# Check for five time winners
if(___){
count <- count + 1
}
}
print(count/10000)