Pass line bahsini kazanma olasılığı
Şimdi, pass line bahsini kazanma olasılığını tahmin etmek için daha önce oluşturduğumuz fonksiyonları kullanarak 10.000 Craps oyunu simüle edeceğiz. Daha önce yazdığın roll_dice ve evaluate_first_roll() fonksiyonları bu egzersizde kullanman için önceden yüklendi. evaluate_first_roll() fonksiyonunun atıcının ilk atışını girdi olarak aldığını ve sonrasında ne olması gerektiğine karar verdiğini unutma.
Bu egzersiz, kursun bir parçasıdır
R ile Olasılık Bulmacaları
Egzersiz talimatları
- Atıcının ilk atışını iki zarı yuvarlamayı simüle ederek gerçekleştir.
- İlk atışın değerini kullanarak pass line bahsinin kazanılıp kazanılmayacağını belirle ve sonucu
wonvektörüne kaydet.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
set.seed(1)
won <- rep(NA, 10000)
for(i in 1:10000){
# Shooter's first roll
roll <- ___
# Determine result and store it
won[_] <- ___
}
sum(won)/10000