Fungsi untuk menjalankan satu ronde
Sekarang, mari gunakan fungsi dari latihan sebelumnya, dan tulis satu fungsi utama bernama evaluate_first_roll untuk menyelesaikan satu ronde Craps. Seperti terlihat pada kode contoh di bawah, fungsi ini akan menerima lemparan pertama shooter sebagai masukan, lalu melanjutkan proses sesuai hasil tersebut. Fungsi roll_dice dan roll_after_point sudah dimuat untuk Anda.
Latihan ini adalah bagian dari kursus
Teka-teki Probabilitas di R
Petunjuk latihan
- Gunakan operator
%in%untuk memeriksa apakah hasil lemparan adalah 7 atau 11, yang berarti langsung menang. - Gunakan operator
%in%untuk memeriksa apakah hasil lemparan adalah 2, 3, atau 12, yang berarti langsung kalah. - Jika sebuah point ditetapkan, lanjutkan melempar hingga point tersebut muncul kembali (menang), atau 7 muncul (kalah).
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
evaluate_first_roll <- function(roll){
# Check whether the first roll gives an immediate win
if(___){
won <- TRUE
}
# Check whether the first roll gives an immediate loss
if(___){
won <- FALSE
}
if(roll %in% c(4,5,6,8,9,10) ){
# Roll until the point or a 7 is rolled and store the win/lose outcome
won <- ___
}
return(won)
}