Twee kaarten te gaan
Laten we nu het punt bekijken waarop er nog twee kaarten gedeeld worden. Hier gaan we de winstkans bepalen voor elk aantal outs.
Op dit moment liggen er 3 kaarten open en heb jij er 2 in je hand. Met in totaal 52 kaarten in het deck blijven er dan 47 onbekende kaarten over, dus de noemer is \({47 \choose 2}\) om het totale aantal combinaties voor de twee nog te komen kaarten weer te geven.
Een veelgebruikte vuistregel onder pokerspelers is dat de winstkans gelijk is aan \(\frac{4 \times outs}{100}\). Hoe goed is deze benadering?
Deze oefening maakt deel uit van de cursus
Kanspuzzels in R
Oefeninstructies
- Gebruik de vector
outsom de teller vanp_no_outsin te vullen, die het aantal manieren telt waarop geen van de outs in de volgende twee kaarten verschijnt. - Bereken de winstkansen die horen bij elk aantal outs.
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
outs <- c(0:25)
# Calculate probability of not winning
p_no_outs <- ___/choose(47, 2)
# Calculate probability of winning
p_win <- ___
print(p_win)