Dos cartas por salir
Ahora consideremos el momento en que aún faltan por salir dos cartas. Aquí vamos a calcular la probabilidad de ganar para cualquier número de outs.
En este punto, hay 3 cartas descubiertas y 2 en tu mano. Con 52 cartas en total en la baraja, quedan 47 cartas no vistas, así que el denominador es \({47 \choose 2}\) para representar el número total de combinaciones posibles de las dos cartas que faltan por salir.
Una aproximación muy usada entre jugadores de póker es que la probabilidad de ganar es igual a \(\frac{4 \times outs}{100}\). ¿Qué tan buena es esta aproximación?
Este ejercicio forma parte del curso
Acertijos de probabilidad en R
Instrucciones del ejercicio
- Usa el vector
outspara completar el numerador dep_no_outs, que cuenta el número de formas en que ninguno de los outs saldrá en las próximas dos cartas. - Calcula las probabilidades de ganar correspondientes a cada número de outs.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
outs <- c(0:25)
# Calculate probability of not winning
p_no_outs <- ___/choose(47, 2)
# Calculate probability of winning
p_win <- ___
print(p_win)