Fungsi untuk terus melempar saat point sudah ditetapkan
Mari kita tulis fungsi yang akan menangani semua lemparan yang terjadi setelah sebuah point ditetapkan. Ingat bahwa ini berarti fungsi harus terus melempar hingga point muncul kembali, atau 7 muncul. Begitu salah satu dari keduanya terjadi, fungsi harus berhenti, dan melaporkan apakah hasilnya menang atau kalah.
Perhatikan bahwa di dalam fungsi ini, kita akan kembali menggunakan fungsi roll_dice yang telah kita definisikan sebelumnya.
Latihan ini adalah bagian dari kursus
Teka-teki Probabilitas di R
Petunjuk latihan
- Lengkapi kondisi dalam perulangan while untuk terus melempar hingga 7 atau point muncul.
- Lengkapi kondisi untuk memeriksa apakah lemparan terbaru menghasilkan kemenangan.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
roll_after_point <- function(point){
new_roll <- 0
# Roll until either a 7 or the point is rolled
while( ___ ){
new_roll <- roll_dice(2)
if(new_roll == 7){
won <- FALSE
}
# Check whether the new roll gives a win
if(___ == ___){
won <- TRUE
}
}
return(won)
}